Let us set some global options for all code chunks in this document.
knitr::opts_chunk$set(
message = FALSE, # Disable messages printed by R code chunks
warning = FALSE, # Disable warnings printed by R code chunks
echo = TRUE, # Show R code within code chunks in output
include = TRUE, # Include both R code and its results in output
eval = TRUE, # Evaluate R code chunks
cache = FALSE, # Enable caching of R code chunks for faster rendering
fig.align = "center",
out.width = "100%",
retina = 2,
error = TRUE,
collapse = TRUE
)
rm(list = ls())
set.seed(1982)Let us now load some required libraries.
# Load required libraries
# inla.upgrade(testing = TRUE)
# remotes::install_github("inlabru-org/inlabru", ref = "devel")
# remotes::install_github("davidbolin/rspde", ref = "devel")
# remotes::install_github("davidbolin/metricgraph", ref = "devel")
# remotes::install_github("davidbolin/ngme2", ref = "devel")
library(INLA)
#inla.setOption(num.threads = 7)
library(inlabru)
library(rSPDE)
library(MetricGraph)
library(ngme2)
library(plotly)
library(dplyr)
library(sf)
library(here)Function standarize() below is later used to standardize
the covariate SpeedLimit.
standardize <- function(x) {return((x - mean(x)) / sd(x))}To keep track of the changes, we provide summaries of every new created object. Those summaries can be accessed by pressing the Show buttons below
We load the graph object sf_graph (which only contains
weights) and the data (already graph-processed).
load(here("Graph_objects/graph_construction_30_04_2024partialtomtomwhichlonglatsf.RData"))
load(here("Data_files/data_day7142128_hour13_with_no_consecutive_zeros_partialtomtom_graph_30_04_2024_processed.RData"))
data_on_graph = data_on_graph %>%
dplyr::select(-datetime)sf_graph$get_edge_lengths() %>% head() %>% capture.output() %>% grep("^Units:", ., value = TRUE)
## [1] "Units: [km]"summary(sf_graph)
## A metric graph object with:
##
## Vertices:
## Total: 4017
## Degree 2: 1821; Degree 3: 180; Degree 4: 1402; Degree 5: 94; Degree 6: 367;
## Degree 7: 36; Degree 8: 116; Degree 12: 1;
## With incompatible directions: 0
##
## Edges:
## Total: 6827
## Lengths:
## Min: 0.002834658 ; Max: 0.2743201 ; Total: 311.1441
## Weights:
## Columns: Length FRC SpeedLimit StreetName harmonicAverageSpeed medianSpeed averageSpeed sampleSize averageTravelTime medianTravelTime travelTimeRatio List_Number 5percentile 10percentile 15percentile 20percentile 25percentile 30percentile 35percentile 40percentile 45percentile 50percentile 55percentile 60percentile 65percentile 70percentile 75percentile 80percentile 85percentile 90percentile 95percentile road_type class_6 class_5 class_4 class_0 class_3 class_1 upto1 upto3 upto4 upto5 upto6 density density_per_hour
## That are circles: 0
##
## Graph units:
## Vertices unit: degrees ; Lengths unit: km
##
## Longitude and Latitude coordinates: TRUE
## Which spatial package: sf
## CRS: EPSG:4326
##
## Some characteristics of the graph:
## Connected: TRUE
## Has loops: FALSE
## Has multiple edges: TRUE
## Is a tree: FALSE
## Distance consistent: TRUE
## Has Euclidean edges: FALSE
##
## Computed quantities inside the graph:
## Laplacian: FALSE ; Geodesic distances: TRUE
## Resistance distances: FALSE ; Finite element matrices: FALSE
##
## Mesh: The graph has no mesh!
##
## Data: The graph has no data!
##
## Tolerances:
## vertex-vertex: 0.001
## vertex-edge: 0.001
## edge-edge: 0
summary(data_on_graph)
## ID speed day .distance_to_graph
## Min. :5701 Min. : 0.000 Min. :1.000 Min. :0.000000
## 1st Qu.:6571 1st Qu.: 1.609 1st Qu.:2.000 1st Qu.:0.001655
## Median :6687 Median :14.484 Median :3.000 Median :0.003552
## Mean :7106 Mean :15.142 Mean :2.556 Mean :0.004470
## 3rd Qu.:7281 3rd Qu.:24.140 3rd Qu.:4.000 3rd Qu.:0.006153
## Max. :8969 Max. :99.779 Max. :4.000 Max. :0.019991
## .edge_number .distance_on_edge .group .coord_x
## Min. : 1 Min. :0.0000 Length:39575 Min. :-122.4
## 1st Qu.:1420 1st Qu.:0.2717 Class :character 1st Qu.:-122.4
## Median :2881 Median :0.5140 Mode :character Median :-122.4
## Mean :3091 Mean :0.5080 Mean :-122.4
## 3rd Qu.:4753 3rd Qu.:0.7493 3rd Qu.:-122.4
## Max. :6826 Max. :1.0000 Max. :-122.4
## .coord_y
## Min. :37.77
## 1st Qu.:37.78
## Median :37.79
## Mean :37.79
## 3rd Qu.:37.79
## Max. :37.81The following commands remove zero speed observations that are 1m away from the graph, and after that, they remove any speed observations that are 3m away from the graph.
to_remove = data_on_graph %>%
filter(speed == 0, .distance_to_graph > 0.001)
data_on_graph = setdiff(data_on_graph, to_remove) %>%
filter(.distance_to_graph <= 0.003) %>% mutate(E = 1)summary(to_remove)
## ID speed day .distance_to_graph .edge_number
## Min. :5701 Min. :0 Min. :1.000 Min. :0.001001 Min. : 1
## 1st Qu.:6574 1st Qu.:0 1st Qu.:2.000 1st Qu.:0.002757 1st Qu.:1382
## Median :6688 Median :0 Median :3.000 Median :0.004562 Median :2788
## Mean :7078 Mean :0 Mean :2.556 Mean :0.005454 Mean :3031
## 3rd Qu.:7277 3rd Qu.:0 3rd Qu.:4.000 3rd Qu.:0.007129 3rd Qu.:4715
## Max. :8969 Max. :0 Max. :4.000 Max. :0.019988 Max. :6812
## .distance_on_edge .group .coord_x .coord_y
## Min. :0.0000 Length:8596 Min. :-122.4 Min. :37.77
## 1st Qu.:0.3069 Class :character 1st Qu.:-122.4 1st Qu.:37.78
## Median :0.5297 Mode :character Median :-122.4 Median :37.79
## Mean :0.5170 Mean :-122.4 Mean :37.79
## 3rd Qu.:0.7354 3rd Qu.:-122.4 3rd Qu.:37.79
## Max. :0.9999 Max. :-122.4 Max. :37.81
summary(data_on_graph)
## ID speed day .distance_to_graph
## Min. :5701 Min. : 0.000 Min. :1.00 Min. :0.0000000
## 1st Qu.:6565 1st Qu.: 9.656 1st Qu.:2.00 1st Qu.:0.0005833
## Median :6683 Median :19.312 Median :3.00 Median :0.0012615
## Mean :7115 Mean :19.383 Mean :2.55 Mean :0.0013510
## 3rd Qu.:7286 3rd Qu.:27.359 3rd Qu.:4.00 3rd Qu.:0.0021075
## Max. :8969 Max. :99.779 Max. :4.00 Max. :0.0029999
## .edge_number .distance_on_edge .group .coord_x
## Min. : 1 Min. :0.0000 Length:14535 Min. :-122.4
## 1st Qu.:1376 1st Qu.:0.2549 Class :character 1st Qu.:-122.4
## Median :2956 Median :0.5135 Mode :character Median :-122.4
## Mean :3130 Mean :0.5096 Mean :-122.4
## 3rd Qu.:4803 3rd Qu.:0.7693 3rd Qu.:-122.4
## Max. :6817 Max. :0.9999 Max. :-122.4
## .coord_y E
## Min. :37.77 Min. :1
## 1st Qu.:37.78 1st Qu.:1
## Median :37.79 Median :1
## Mean :37.79 Mean :1
## 3rd Qu.:37.79 3rd Qu.:1
## Max. :37.81 Max. :1We add data to the graph.
sf_graph$add_observations(data = data_on_graph,
group = "day",
normalized = TRUE,
clear_obs = TRUE)sf_graph$get_data()
## # A tibble: 14,535 × 10
## ID speed day .distance_to_graph .coord_x .coord_y E .edge_number
## <int> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl>
## 1 6666 0 1 0.00100 -122. 37.8 1 1
## 2 8941 12.9 1 0.00230 -122. 37.8 1 4
## 3 8768 24.1 1 0.00233 -122. 37.8 1 6
## 4 8929 32.2 1 0.00151 -122. 37.8 1 6
## 5 8965 0 1 0.000647 -122. 37.8 1 9
## 6 8965 19.3 1 0.00170 -122. 37.8 1 14
## 7 8954 22.5 1 0.00103 -122. 37.8 1 14
## 8 8774 19.3 1 0.00279 -122. 37.8 1 14
## 9 6655 30.6 1 0.00208 -122. 37.8 1 18
## 10 6677 14.5 1 0.000436 -122. 37.8 1 20
## # ℹ 14,525 more rows
## # ℹ 2 more variables: .distance_on_edge <dbl>, .group <chr>
summary(sf_graph)
## A metric graph object with:
##
## Vertices:
## Total: 4017
## Degree 2: 1821; Degree 3: 180; Degree 4: 1402; Degree 5: 94; Degree 6: 367;
## Degree 7: 36; Degree 8: 116; Degree 12: 1;
## With incompatible directions: 0
##
## Edges:
## Total: 6827
## Lengths:
## Min: 0.002834658 ; Max: 0.2743201 ; Total: 311.1441
## Weights:
## Columns: Length FRC SpeedLimit StreetName harmonicAverageSpeed medianSpeed averageSpeed sampleSize averageTravelTime medianTravelTime travelTimeRatio List_Number 5percentile 10percentile 15percentile 20percentile 25percentile 30percentile 35percentile 40percentile 45percentile 50percentile 55percentile 60percentile 65percentile 70percentile 75percentile 80percentile 85percentile 90percentile 95percentile road_type class_6 class_5 class_4 class_0 class_3 class_1 upto1 upto3 upto4 upto5 upto6 density density_per_hour
## That are circles: 0
##
## Graph units:
## Vertices unit: degrees ; Lengths unit: km
##
## Longitude and Latitude coordinates: TRUE
## Which spatial package: sf
## CRS: EPSG:4326
##
## Some characteristics of the graph:
## Connected: TRUE
## Has loops: FALSE
## Has multiple edges: TRUE
## Is a tree: FALSE
## Distance consistent: TRUE
## Has Euclidean edges: FALSE
##
## Computed quantities inside the graph:
## Laplacian: FALSE ; Geodesic distances: TRUE
## Resistance distances: FALSE ; Finite element matrices: FALSE
##
## Mesh: The graph has no mesh!
##
## Data:
## Columns: ID speed day E
## Groups: .group
##
## Tolerances:
## vertex-vertex: 0.001
## vertex-edge: 0.001
## edge-edge: 0We get the values of the weights at data locations. This essentially gives us covariates from the weights.
sf_graph$edgeweight_to_data(data_loc = TRUE)sf_graph$get_data()
## # A tibble: 57,112 × 55
## ID speed day .distance_to_graph E Length FRC SpeedLimit StreetName
## <int> <dbl> <dbl> <dbl> <dbl> <dbl> <chr> <dbl> <chr>
## 1 NA NA NA NA NA 0.0361 5 40 Harrison …
## 2 NA NA NA NA NA 0.0361 5 40 Harrison …
## 3 NA NA NA NA NA 0.0361 5 40 Harrison …
## 4 6666 0 1 0.00100 1 0.0361 5 40 Harrison …
## 5 NA NA NA NA NA 0.0361 5 40 Harrison …
## 6 NA NA NA NA NA 0.0361 5 40 Harrison …
## 7 NA NA NA NA NA 0.0361 5 40 Harrison …
## 8 NA NA NA NA NA 0.0361 5 40 Harrison …
## 9 NA NA NA NA NA 0.0361 5 40 Harrison …
## 10 8941 12.9 1 0.00230 1 0.112 6 35 Rhode Isl…
## # ℹ 57,102 more rows
## # ℹ 46 more variables: harmonicAverageSpeed <dbl>, medianSpeed <dbl>,
## # averageSpeed <dbl>, sampleSize <int>, averageTravelTime <dbl>,
## # medianTravelTime <dbl>, travelTimeRatio <dbl>, List_Number <int>,
## # `5percentile` <int>, `10percentile` <int>, `15percentile` <int>,
## # `20percentile` <int>, `25percentile` <int>, `30percentile` <int>,
## # `35percentile` <int>, `40percentile` <int>, `45percentile` <int>, …
summary(sf_graph)
## A metric graph object with:
##
## Vertices:
## Total: 4017
## Degree 2: 1821; Degree 3: 180; Degree 4: 1402; Degree 5: 94; Degree 6: 367;
## Degree 7: 36; Degree 8: 116; Degree 12: 1;
## With incompatible directions: 0
##
## Edges:
## Total: 6827
## Lengths:
## Min: 0.002834658 ; Max: 0.2743201 ; Total: 311.1441
## Weights:
## Columns: Length FRC SpeedLimit StreetName harmonicAverageSpeed medianSpeed averageSpeed sampleSize averageTravelTime medianTravelTime travelTimeRatio List_Number 5percentile 10percentile 15percentile 20percentile 25percentile 30percentile 35percentile 40percentile 45percentile 50percentile 55percentile 60percentile 65percentile 70percentile 75percentile 80percentile 85percentile 90percentile 95percentile road_type class_6 class_5 class_4 class_0 class_3 class_1 upto1 upto3 upto4 upto5 upto6 density density_per_hour
## That are circles: 0
##
## Graph units:
## Vertices unit: degrees ; Lengths unit: km
##
## Longitude and Latitude coordinates: TRUE
## Which spatial package: sf
## CRS: EPSG:4326
##
## Some characteristics of the graph:
## Connected: TRUE
## Has loops: FALSE
## Has multiple edges: TRUE
## Is a tree: FALSE
## Distance consistent: TRUE
## Has Euclidean edges: FALSE
##
## Computed quantities inside the graph:
## Laplacian: FALSE ; Geodesic distances: TRUE
## Resistance distances: FALSE ; Finite element matrices: FALSE
##
## Mesh: The graph has no mesh!
##
## Data:
## Columns: ID speed day E Length FRC SpeedLimit StreetName harmonicAverageSpeed medianSpeed averageSpeed sampleSize averageTravelTime medianTravelTime travelTimeRatio List_Number 5percentile 10percentile 15percentile 20percentile 25percentile 30percentile 35percentile 40percentile 45percentile 50percentile 55percentile 60percentile 65percentile 70percentile 75percentile 80percentile 85percentile 90percentile 95percentile road_type class_6 class_5 class_4 class_0 class_3 class_1 upto1 upto3 upto4 upto5 upto6 density density_per_hour
## Groups: .group
##
## Tolerances:
## vertex-vertex: 0.001
## vertex-edge: 0.001
## edge-edge: 0When running
sf_graph$edgeweight_to_data(data_loc = TRUE), some
NA values are created (because the data is grouped). We
remove them below. We also standardize the SpeedLimit
covariate.
data = sf_graph$get_data() %>%
drop_na(-StreetName) %>% # this drops all rows with at least one NA value but without taking into account StreetName
mutate(across(c("SpeedLimit"), ~standardize(.))) %>%
dplyr::select(speed, SpeedLimit, E) %>% mutate(speed = floor(speed))
E = data$EThe code of chunk below was executed only one time.
{r, eval = FALSE}
aux = data |>
rename(distance_on_edge = .distance_on_edge, edge_number = .edge_number) |>
as.data.frame() |>
dplyr::select(edge_number, distance_on_edge, .group)
distmatrixlist = list()
for (i in 1:4) {
distmatrixlist[[i]] = sf_graph$compute_geodist_PtE(PtE = aux %>%
filter(.group == as.character(i)) %>%
dplyr::select(-.group),
normalized = TRUE,
include_vertices = FALSE)
}
save(distmatrixlist, file = here("Models_output/distmatrixfixed30_04_2024.RData"))
The code of chunk above was executed only one time.
summary(data)
## speed SpeedLimit E .group
## Min. : 0.00 Min. :-2.3744 Min. :1 Length:14535
## 1st Qu.: 9.00 1st Qu.:-0.1006 1st Qu.:1 Class :character
## Median :19.00 Median :-0.1006 Median :1 Mode :character
## Mean :18.93 Mean : 0.0000 Mean :1
## 3rd Qu.:27.00 3rd Qu.:-0.1006 3rd Qu.:1
## Max. :99.00 Max. : 6.6176 Max. :1
## .edge_number .distance_on_edge .coord_x .coord_y
## Min. : 1 Min. :0.0000 Min. :-122.4 Min. :37.77
## 1st Qu.:1376 1st Qu.:0.2549 1st Qu.:-122.4 1st Qu.:37.78
## Median :2956 Median :0.5135 Median :-122.4 Median :37.79
## Mean :3130 Mean :0.5096 Mean :-122.4 Mean :37.79
## 3rd Qu.:4803 3rd Qu.:0.7693 3rd Qu.:-122.4 3rd Qu.:37.79
## Max. :6817 Max. :0.9999 Max. :-122.4 Max. :37.81We add the data again but now with the new standardized
SpeedLimit covariate.
sf_graph$add_observations(data = data,
group = "day",
normalized = TRUE,
clear_obs = TRUE)sf_graph$get_data()
## # A tibble: 14,535 × 8
## speed SpeedLimit E .coord_x .coord_y .edge_number .distance_on_edge
## <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl>
## 1 0 -0.101 1 -122. 37.8 1 0.437
## 2 12 -0.617 1 -122. 37.8 4 0.144
## 3 24 -0.617 1 -122. 37.8 6 0.252
## 4 32 -0.617 1 -122. 37.8 6 0.658
## 5 0 -0.927 1 -122. 37.8 9 0.601
## 6 19 -0.927 1 -122. 37.8 14 0.0247
## 7 22 -0.927 1 -122. 37.8 14 0.362
## 8 19 -0.927 1 -122. 37.8 14 0.832
## 9 30 -0.927 1 -122. 37.8 18 0.358
## 10 14 -0.927 1 -122. 37.8 20 0.309
## # ℹ 14,525 more rows
## # ℹ 1 more variable: .group <chr>
summary(sf_graph)
## A metric graph object with:
##
## Vertices:
## Total: 4017
## Degree 2: 1821; Degree 3: 180; Degree 4: 1402; Degree 5: 94; Degree 6: 367;
## Degree 7: 36; Degree 8: 116; Degree 12: 1;
## With incompatible directions: 0
##
## Edges:
## Total: 6827
## Lengths:
## Min: 0.002834658 ; Max: 0.2743201 ; Total: 311.1441
## Weights:
## Columns: Length FRC SpeedLimit StreetName harmonicAverageSpeed medianSpeed averageSpeed sampleSize averageTravelTime medianTravelTime travelTimeRatio List_Number 5percentile 10percentile 15percentile 20percentile 25percentile 30percentile 35percentile 40percentile 45percentile 50percentile 55percentile 60percentile 65percentile 70percentile 75percentile 80percentile 85percentile 90percentile 95percentile road_type class_6 class_5 class_4 class_0 class_3 class_1 upto1 upto3 upto4 upto5 upto6 density density_per_hour
## That are circles: 0
##
## Graph units:
## Vertices unit: degrees ; Lengths unit: km
##
## Longitude and Latitude coordinates: TRUE
## Which spatial package: sf
## CRS: EPSG:4326
##
## Some characteristics of the graph:
## Connected: TRUE
## Has loops: FALSE
## Has multiple edges: TRUE
## Is a tree: FALSE
## Distance consistent: TRUE
## Has Euclidean edges: FALSE
##
## Computed quantities inside the graph:
## Laplacian: FALSE ; Geodesic distances: TRUE
## Resistance distances: FALSE ; Finite element matrices: FALSE
##
## Mesh: The graph has no mesh!
##
## Data:
## Columns: speed SpeedLimit E
## Groups: .group
##
## Tolerances:
## vertex-vertex: 0.001
## vertex-edge: 0.001
## edge-edge: 0We build a mesh.
h = 0.05
sf_graph$build_mesh(h = h)summary(sf_graph)
## A metric graph object with:
##
## Vertices:
## Total: 4017
## Degree 2: 1821; Degree 3: 180; Degree 4: 1402; Degree 5: 94; Degree 6: 367;
## Degree 7: 36; Degree 8: 116; Degree 12: 1;
## With incompatible directions: 0
##
## Edges:
## Total: 6827
## Lengths:
## Min: 0.002834658 ; Max: 0.2743201 ; Total: 311.1441
## Weights:
## Columns: Length FRC SpeedLimit StreetName harmonicAverageSpeed medianSpeed averageSpeed sampleSize averageTravelTime medianTravelTime travelTimeRatio List_Number 5percentile 10percentile 15percentile 20percentile 25percentile 30percentile 35percentile 40percentile 45percentile 50percentile 55percentile 60percentile 65percentile 70percentile 75percentile 80percentile 85percentile 90percentile 95percentile road_type class_6 class_5 class_4 class_0 class_3 class_1 upto1 upto3 upto4 upto5 upto6 density density_per_hour
## That are circles: 0
##
## Graph units:
## Vertices unit: degrees ; Lengths unit: km
##
## Longitude and Latitude coordinates: TRUE
## Which spatial package: sf
## CRS: EPSG:4326
##
## Some characteristics of the graph:
## Connected: TRUE
## Has loops: FALSE
## Has multiple edges: TRUE
## Is a tree: FALSE
## Distance consistent: TRUE
## Has Euclidean edges: FALSE
##
## Computed quantities inside the graph:
## Laplacian: FALSE ; Geodesic distances: TRUE
## Resistance distances: FALSE ; Finite element matrices: FALSE
##
## Mesh:
## Max h_e: 0.04999798 ; Min n_e: 0
##
## Data:
## Columns: speed SpeedLimit E
## Groups: .group
##
## Tolerances:
## vertex-vertex: 0.001
## vertex-edge: 0.001
## edge-edge: 0We get the value of the weights at mesh locations. This will allow us
to built matrices B.sigma and B.range below.
Again,
sf_graph$edgeweight_to_data(mesh = TRUE, add = FALSE, return = TRUE)
creates repeated information (because the data is grouped). We fix that
by filtering one group. We also standardize the SpeedLimit
covariate.
mesh = sf_graph$edgeweight_to_data(mesh = TRUE,
add = FALSE,
return = TRUE) %>%
filter(.group == 1) %>%
mutate(across(c("SpeedLimit"), ~standardize(.))) %>%
dplyr:::select.data.frame(SpeedLimit)summary(mesh)
## SpeedLimit
## Min. :-1.9800
## 1st Qu.:-0.1744
## Median :-0.1744
## Mean : 0.0000
## 3rd Qu.:-0.1744
## Max. : 5.1604stat.time.ini <- Sys.time()
################################################################################
################################# STATIONARY MODEL #############################
################################################################################
rspde_model_stat <- rspde.metric_graph(sf_graph,
parameterization = "matern",
nu = 0.5)str(rspde_model_stat)
## List of 21
## $ f :List of 3
## ..$ model : chr "cgeneric"
## ..$ n : int 7169
## ..$ cgeneric:List of 5
## .. ..$ model: chr "inla_cgeneric_rspde_stat_int_model"
## .. ..$ shlib: chr "/home/rierasl/R/x86_64-pc-linux-gnu-library/4.4/INLA/bin/linux/64bit/external/rSPDE/librSPDE.so"
## .. ..$ n : int 7169
## .. ..$ debug: logi FALSE
## .. ..$ data :List of 5
## .. .. ..$ ints :List of 5
## .. .. .. ..$ n : int 7169
## .. .. .. ..$ debug : int 0
## .. .. .. ..$ m_alpha : int 1
## .. .. .. ..$ graph_opt_i: int [1:16024] 0 0 0 1 1 1 1 1 1 2 ...
## .. .. .. ..$ graph_opt_j: int [1:16024] 0 1 985 1 1700 5207 5364 6858 7041 2 ...
## .. .. ..$ doubles :List of 4
## .. .. .. ..$ matrices_less : num [1:32048] 0.0797 0 0 0.1564 0 ...
## .. .. .. ..$ theta.prior.mean: num [1:2] 0 0.223
## .. .. .. ..$ start.theta : num [1:2] 0 0.223
## .. .. .. ..$ nu : num 0.5
## .. .. ..$ characters:List of 4
## .. .. .. ..$ model : chr "inla_cgeneric_rspde_stat_int_model"
## .. .. .. ..$ shlib : chr "/home/rierasl/R/x86_64-pc-linux-gnu-library/4.4/INLA/bin/linux/64bit/external/rSPDE/librSPDE.so"
## .. .. .. ..$ parameterization : chr "matern"
## .. .. .. ..$ prior.theta.param: chr "theta"
## .. .. ..$ matrices :List of 1
## .. .. .. ..$ theta.prior.prec: num [1:6] 2 2 0.1 0 0 0.1
## .. .. ..$ smatrices : list()
## .. ..- attr(*, "class")= chr "inla.cgeneric"
## $ cgeneric_type : chr "int_alpha"
## $ nu : num 0.5
## $ theta.prior.mean : num [1:2] 0 0.223
## $ prior.nu :List of 4
## ..$ loglocation: num -5e-06
## ..$ mean : num 1
## ..$ prec : num 3
## ..$ logscale : num 1
## $ theta.prior.prec : num [1:2, 1:2] 0.1 0 0 0.1
## $ start.nu : num 0.5
## $ integer.nu : logi TRUE
## $ start.theta : num [1:2] 0 0.223
## $ stationary : logi TRUE
## $ rspde.order : num 2
## $ dim : num 1
## $ est_nu : logi FALSE
## $ nu.upper.bound : num 2
## $ prior.nu.dist : chr "lognormal"
## $ debug : logi FALSE
## $ type.rational.approx: chr "chebfun"
## $ mesh :Classes 'metric_graph', 'R6' <metric_graph>
## Public:
## add_mesh_observations: function (data = NULL, group = NULL)
## add_observations: function (data = NULL, edge_number = "edge_number", distance_on_edge = "distance_on_edge",
## build_mesh: function (h = NULL, n = NULL, continuous = TRUE, continuous.outs = FALSE,
## buildC: function (alpha = 2, edge_constraint = FALSE)
## buildDirectionalConstraints: function (alpha = 1)
## C: NULL
## characteristics: list
## check_distance_consistency: function ()
## check_euclidean: function ()
## clear_observations: function ()
## clone: function (deep = FALSE)
## CoB: NULL
## compute_characteristics: function (check_euclidean = FALSE)
## compute_fem: function (petrov = FALSE)
## compute_geodist: function (full = FALSE, obs = TRUE, group = NULL, verbose = 0)
## compute_geodist_mesh: function ()
## compute_geodist_PtE: function (PtE, normalized = TRUE, include_vertices = TRUE, verbose = 0)
## compute_laplacian: function (full = FALSE, obs = TRUE, group = NULL, verbose = 0)
## compute_PtE_edges: function ()
## compute_resdist: function (full = FALSE, obs = TRUE, group = NULL, check_euclidean = FALSE,
## compute_resdist_mesh: function ()
## compute_resdist_PtE: function (PtE, normalized = TRUE, include_vertices = FALSE, check_euclidean = FALSE,
## coordinates: function (PtE = NULL, XY = NULL, normalized = TRUE)
## drop_na: function (...)
## E: 1 3 3 6 4 7 9 11 13 14 15 16 18 19 20 21 23 25 27 29 31 ...
## edge_lengths: 0.0363234139144278 0.01586106867077 0.027923568765887 0. ...
## edges: metric_graph_edges
## edgeweight_to_data: function (loc = NULL, mesh = FALSE, data_loc = FALSE, weight_col = NULL,
## fem_basis: function (PtE)
## filter: function (..., .drop_na = FALSE, .drop_all_na = TRUE)
## geo_dist: list
## get_data: function (group = NULL, tibble = TRUE, drop_na = FALSE, drop_all_na = TRUE)
## get_degrees: function (which = "degree")
## get_edge_lengths: function (unit = NULL)
## get_edge_weights: function (data.frame = FALSE, tibble = TRUE)
## get_groups: function (get_cols = FALSE)
## get_initial_graph: function ()
## get_locations: function ()
## get_mesh_locations: function (bru = FALSE, loc = NULL, normalized = TRUE)
## get_PtE: function ()
## get_vertices_incomp_dir: function ()
## initialize: function (edges = NULL, V = NULL, E = NULL, vertex_unit = NULL,
## is_tree: function ()
## Laplacian: NULL
## mesh: list
## mesh_A: function (PtE)
## mutate: function (..., .drop_na = FALSE, .drop_all_na = TRUE)
## nE: 6827
## nV: 4017
## observation_to_vertex: function (tolerance = 1e-15, mesh_warning = TRUE)
## plot: function (data = NULL, newdata = NULL, group = 1, plotly = FALSE,
## plot_connections: function ()
## plot_function: function (data = NULL, newdata = NULL, group = 1, X = NULL, plotly = FALSE,
## plot_movie: function (X, plotly = TRUE, vertex_size = 5, vertex_color = "black",
## print: function ()
## process_data: function (data = NULL, edge_number = "edge_number", distance_on_edge = "distance_on_edge",
## prune_vertices: function (check_weights = TRUE, verbose = FALSE)
## PtV: NULL
## res_dist: NULL
## select: function (..., .drop_na = FALSE, .drop_all_na = TRUE)
## set_edge_weights: function (weights = rep(1, self$nE), kirchhoff_weights = NULL)
## summarise: function (..., .include_graph_groups = FALSE, .groups = NULL,
## summary: function (messages = FALSE, compute_characteristics = TRUE, check_euclidean = TRUE,
## V: -122.41277 -122.41249 -122.40376 -122.40358 -122.40379 - ...
## vertices: metric_graph_vertices
## VtEfirst: function ()
## Private:
## A: function (group = NULL, obs_to_vert = FALSE, drop_na = FALSE,
## add_vertices: function (PtE, tolerance = 1e-10, verbose)
## addinfo: FALSE
## clear_initial_info: function ()
## compute_degrees: function ()
## compute_laplacian_PtE: function (PtE, normalized = TRUE, verbose = verbose)
## compute_lengths: function (longlat, unit, crs, proj4string, which_longlat, vertex_unit,
## connected: TRUE
## coordinates_multiple_snaps: function (XY, tolerance, verbose = verbose, crs, proj4string,
## create_update_vertices: function ()
## crs: crs
## data: metric_graph_data, list
## edge_weights: tbl_df, tbl, data.frame
## find_edge_edge_points: function (tol, verbose, crs, proj4string, longlat, fact, which_longlat)
## find_mesh_bc: function ()
## get_edge_weights_internal: function (data.frame = FALSE)
## group_col: .group
## initial_edges_added: NULL
## initial_graph: metric_graph, R6
## kirchhoff_weights: NULL
## length_unit: km
## line_to_vertex: function (tolerance = 0, longlat = FALSE, fact, verbose, crs,
## longlat: TRUE
## merge_close_vertices: function (tolerance, fact)
## merge.all.deg2: function ()
## mesh_merge_deg2: function ()
## mesh_merge_outs: function ()
## move_V_first: function ()
## plot_2d: function (line_width = 0.1, marker_size = 1, vertex_color = "black",
## plot_3d: function (line_width = 1, marker_size = 1, vertex_color = "rgb(0,0,0)",
## proj4string: NULL
## prune_warning: FALSE
## pruned: FALSE
## PtE_to_mesh: function (PtE)
## ref_edges: 1 1552 2 5 3133 4 6 395 7 526 8 6466 9 10 11 12 38 13 14 ...
## remove_circles: function (threshold, verbose, longlat, unit, crs, proj4string,
## remove.first.deg2: function (res)
## set_first_weights: function (weights = rep(1, self$nE))
## set_petrov_matrices: function ()
## split_edge: function (Ei, t, tolerance = 0)
## temp_PtE: NULL
## tolerance: list
## transform: FALSE
## vertex_unit: degrees
## which_longlat: sf
## $ fem_mesh :List of 4
## ..$ c0:Formal class 'dgTMatrix' [package "Matrix"] with 6 slots
## .. .. ..@ i : int [1:7169] 0 1 2 3 4 5 6 7 8 9 ...
## .. .. ..@ j : int [1:7169] 0 1 2 3 4 5 6 7 8 9 ...
## .. .. ..@ Dim : int [1:2] 7169 7169
## .. .. ..@ Dimnames:List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : NULL
## .. .. ..@ x : num [1:7169] 0.0797 0.1564 0.1117 0.0493 0.0614 ...
## .. .. ..@ factors : list()
## ..$ g1:Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. ..@ i : int [1:24879] 0 1 985 0 1 1700 5207 5364 6858 7041 ...
## .. .. ..@ p : int [1:7170] 0 3 10 16 20 23 27 36 44 50 ...
## .. .. ..@ Dim : int [1:2] 7169 7169
## .. .. ..@ Dimnames:List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : NULL
## .. .. ..@ x : num [1:24879] 101.1 -55.1 -46.1 -55.1 216.4 ...
## .. .. ..@ factors : list()
## ..$ g2:Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. ..@ i : int [1:56007] 0 1 985 986 1700 4722 5207 5364 6240 6858 ...
## .. .. ..@ p : int [1:7170] 0 11 22 34 43 52 61 76 89 99 ...
## .. .. ..@ Dim : int [1:2] 7169 7169
## .. .. ..@ Dimnames:List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : NULL
## .. .. ..@ x : num [1:56007] 172097 -145986 -232979 119006 15770 ...
## .. .. ..@ factors : list()
## ..$ g3:Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. ..@ i : int [1:96755] 0 1 230 984 985 986 1700 1701 2280 2455 ...
## .. .. ..@ p : int [1:7170] 0 17 35 57 76 91 103 126 150 166 ...
## .. .. ..@ Dim : int [1:2] 7169 7169
## .. .. ..@ Dimnames:List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : NULL
## .. .. ..@ x : num [1:96755] 3.94e+08 -3.74e+08 -2.65e+07 -9.14e+07 -1.47e+09 ...
## .. .. ..@ factors : list()
## $ parameterization : chr "matern"
## $ n.spde : int 7169
## - attr(*, "class")= chr [1:3] "rspde_metric_graph" "inla_rspde" "inla.cgeneric"data_rspde_bru_stat <- graph_data_rspde(rspde_model_stat,
repl = ".all",
loc_name = "loc")str(data_rspde_bru_stat)
## List of 4
## $ data :List of 9
## ..$ speed : num [1:14535] 0 12 24 32 0 19 22 19 30 14 ...
## ..$ SpeedLimit : num [1:14535] -0.101 -0.617 -0.617 -0.617 -0.927 ...
## ..$ E : num [1:14535] 1 1 1 1 1 1 1 1 1 1 ...
## ..$ .coord_x : num [1:14535] -122 -122 -122 -122 -122 ...
## ..$ .coord_y : num [1:14535] 37.8 37.8 37.8 37.8 37.8 ...
## ..$ .edge_number : num [1:14535] 1 4 6 6 9 14 14 14 18 20 ...
## ..$ .distance_on_edge: num [1:14535] 0.437 0.144 0.252 0.658 0.601 ...
## ..$ .group : chr [1:14535] "1" "1" "1" "1" ...
## ..$ loc : num [1:14535, 1:2] 1 4 6 6 9 14 14 14 18 20 ...
## ..- attr(*, "class")= chr [1:2] "metric_graph_data" "list"
## $ index:List of 3
## ..$ field : int [1:28676] 1 2 3 4 5 6 7 8 9 10 ...
## ..$ field.group: int [1:28676] 1 1 1 1 1 1 1 1 1 1 ...
## ..$ field.repl : int [1:28676] 1 1 1 1 1 1 1 1 1 1 ...
## ..- attr(*, "class")= chr [1:2] "inla_rspde_index" "list"
## ..- attr(*, "rspde.order")= num 0
## ..- attr(*, "integer_nu")= logi TRUE
## ..- attr(*, "n.mesh")= int 7169
## ..- attr(*, "name")= chr "field"
## ..- attr(*, "n.group")= int 1
## ..- attr(*, "n.repl")= int 4
## $ repl : chr [1:14535] "1" "1" "1" "1" ...
## $ basis:Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. ..@ i : int [1:29070] 0 555 1905 1906 0 1050 1471 1472 1473 1905 ...
## .. ..@ p : int [1:28677] 0 4 11 11 11 11 12 13 15 15 ...
## .. ..@ Dim : int [1:2] 14535 28676
## .. ..@ Dimnames:List of 2
## .. .. ..$ : NULL
## .. .. ..$ : NULL
## .. ..@ x : num [1:29070] 0.563 0.0495 0.3595 0.7935 0.437 ...
## .. ..@ factors : list()cmp_stat = speed ~ -1 +
Intercept(1) +
SpeedLimit +
field(loc, model = rspde_model_stat,
replicate = data_rspde_bru_stat[["repl"]])
rspde_fit_stat <-
bru(cmp_stat,
data = data_rspde_bru_stat[["data"]],
family = "nbinomial",
#E = E,
options = list(verbose = FALSE)
)str(rspde_fit_stat)
## List of 56
## $ names.fixed : chr [1:2] "Intercept" "SpeedLimit"
## $ summary.fixed :'data.frame': 2 obs. of 7 variables:
## ..$ mean : num [1:2] 2.92 0.12
## ..$ sd : num [1:2] 0.0235 0.0115
## ..$ 0.025quant: num [1:2] 2.8789 0.0973
## ..$ 0.5quant : num [1:2] 2.92 0.12
## ..$ 0.975quant: num [1:2] 2.972 0.142
## ..$ mode : num [1:2] 2.92 0.12
## ..$ kld : num [1:2] 1.30e-07 1.09e-08
## $ marginals.fixed :List of 2
## ..$ Intercept : num [1:43, 1:2] 2.81 2.83 2.85 2.87 2.88 ...
## .. ..- attr(*, "dimnames")=List of 2
## .. .. ..$ : NULL
## .. .. ..$ : chr [1:2] "x" "y"
## ..$ SpeedLimit: num [1:43, 1:2] 0.0719 0.0779 0.0848 0.0932 0.0973 ...
## .. ..- attr(*, "dimnames")=List of 2
## .. .. ..$ : NULL
## .. .. ..$ : chr [1:2] "x" "y"
## $ summary.lincomb :'data.frame': 0 obs. of 0 variables
## $ marginals.lincomb : NULL
## $ size.lincomb : NULL
## $ summary.lincomb.derived :'data.frame': 0 obs. of 0 variables
## $ marginals.lincomb.derived : NULL
## $ size.lincomb.derived : NULL
## $ mlik : num [1:2, 1] -56728 -56726
## ..- attr(*, "dimnames")=List of 2
## .. ..$ : chr [1:2] "log marginal-likelihood (integration)" "log marginal-likelihood (Gaussian)"
## .. ..$ : NULL
## $ cpo :List of 3
## ..$ cpo : logi(0)
## ..$ pit : logi(0)
## ..$ failure: logi(0)
## $ gcpo :List of 5
## ..$ gcpo : NULL
## ..$ kld : NULL
## ..$ mean : NULL
## ..$ sd : NULL
## ..$ groups: NULL
## $ po :List of 1
## ..$ po: num [1:14535] 0.0144 0.0349 0.0181 0.0117 0.0197 ...
## $ waic :List of 4
## ..$ waic : num 112652
## ..$ p.eff : num 536
## ..$ local.waic : num [1:14535] 8.6 6.74 8.06 9.1 8.17 ...
## ..$ local.p.eff: num [1:14535] 0.0649 0.0135 0.021 0.099 0.159 ...
## $ residuals :List of 1
## ..$ deviance.residuals: num [1:14535] -2.922 -0.466 0.463 0.777 -2.83 ...
## $ model.random : chr "CGeneric"
## $ summary.random :List of 1
## ..$ field:'data.frame': 28676 obs. of 8 variables:
## .. ..$ ID : num [1:28676] 1 2 3 4 5 6 7 8 9 10 ...
## .. ..$ mean : num [1:28676] 0.062018 0.002968 0.000568 0.008449 0.012439 ...
## .. ..$ sd : num [1:28676] 0.192 0.169 0.217 0.23 0.246 ...
## .. ..$ 0.025quant: num [1:28676] -0.314 -0.329 -0.425 -0.444 -0.472 ...
## .. ..$ 0.5quant : num [1:28676] 0.062064 0.003088 0.000823 0.008738 0.0128 ...
## .. ..$ 0.975quant: num [1:28676] 0.438 0.335 0.425 0.459 0.495 ...
## .. ..$ mode : num [1:28676] 0.062064 0.003088 0.000824 0.008738 0.012801 ...
## .. ..$ kld : num [1:28676] 6.28e-10 2.40e-10 7.40e-10 8.60e-10 1.19e-09 ...
## $ marginals.random :List of 1
## ..$ field:List of 28676
## .. ..$ index.1 : num [1:43, 1:2] -0.765 -0.658 -0.534 -0.385 -0.314 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.2 : num [1:43, 1:2] -0.724 -0.631 -0.523 -0.392 -0.329 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.3 : num [1:43, 1:2] -0.936 -0.814 -0.675 -0.506 -0.425 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.4 : num [1:43, 1:2] -0.986 -0.857 -0.708 -0.529 -0.444 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.5 : num [1:43, 1:2] -1.055 -0.916 -0.756 -0.564 -0.472 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.6 : num [1:43, 1:2] -1.214 -1.065 -0.893 -0.685 -0.586 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.7 : num [1:43, 1:2] -0.886 -0.766 -0.628 -0.461 -0.382 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.8 : num [1:43, 1:2] -0.79 -0.678 -0.548 -0.391 -0.316 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.9 : num [1:43, 1:2] -1.166 -1.014 -0.839 -0.628 -0.527 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.10 : num [1:43, 1:2] -1.164 -1.006 -0.824 -0.603 -0.498 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.11 : num [1:43, 1:2] -1.182 -1.02 -0.834 -0.611 -0.504 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.12 : num [1:43, 1:2] -1.306 -1.127 -0.921 -0.674 -0.557 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.13 : num [1:43, 1:2] -1.003 -0.874 -0.725 -0.546 -0.46 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.14 : num [1:43, 1:2] -1.104 -0.963 -0.8 -0.604 -0.51 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.15 : num [1:43, 1:2] -0.936 -0.812 -0.668 -0.495 -0.412 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.16 : num [1:43, 1:2] -0.919 -0.794 -0.649 -0.474 -0.39 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.17 : num [1:43, 1:2] -0.687 -0.589 -0.476 -0.338 -0.272 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.18 : num [1:43, 1:2] -1.05 -0.912 -0.753 -0.561 -0.469 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.19 : num [1:43, 1:2] -1.033 -0.897 -0.741 -0.551 -0.461 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.20 : num [1:43, 1:2] -1.219 -1.053 -0.862 -0.631 -0.522 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.21 : num [1:43, 1:2] -1.446 -1.25 -1.024 -0.752 -0.623 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.22 : num [1:43, 1:2] -1.253 -1.083 -0.886 -0.649 -0.535 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.23 : num [1:43, 1:2] -1.427 -1.246 -1.038 -0.787 -0.668 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.24 : num [1:43, 1:2] -1.4 -1.22 -1.012 -0.762 -0.643 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.25 : num [1:43, 1:2] -1.011 -0.857 -0.68 -0.466 -0.364 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.26 : num [1:43, 1:2] -0.718 -0.602 -0.468 -0.306 -0.228 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.27 : num [1:43, 1:2] -1.4 -1.229 -1.032 -0.795 -0.681 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.28 : num [1:43, 1:2] -1.254 -1.098 -0.918 -0.702 -0.598 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.29 : num [1:43, 1:2] -1.191 -1.054 -0.896 -0.705 -0.614 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.30 : num [1:43, 1:2] -0.739 -0.623 -0.49 -0.328 -0.25 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.31 : num [1:43, 1:2] -1.282 -1.132 -0.96 -0.753 -0.654 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.32 : num [1:43, 1:2] -1.286 -1.13 -0.95 -0.732 -0.629 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.33 : num [1:43, 1:2] -1.449 -1.275 -1.074 -0.833 -0.718 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.34 : num [1:43, 1:2] -1.099 -0.977 -0.835 -0.664 -0.582 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.35 : num [1:43, 1:2] -1.551 -1.345 -1.107 -0.822 -0.686 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.36 : num [1:43, 1:2] -1.248 -1.079 -0.883 -0.648 -0.536 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.37 : num [1:43, 1:2] -1.577 -1.369 -1.129 -0.84 -0.702 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.38 : num [1:43, 1:2] -1.574 -1.367 -1.128 -0.841 -0.705 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.39 : num [1:43, 1:2] -1.503 -1.309 -1.085 -0.816 -0.688 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.40 : num [1:43, 1:2] -1.334 -1.162 -0.963 -0.724 -0.611 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.41 : num [1:43, 1:2] -1.439 -1.254 -1.042 -0.787 -0.665 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.42 : num [1:43, 1:2] -1.332 -1.159 -0.959 -0.719 -0.604 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.43 : num [1:43, 1:2] -1.647 -1.443 -1.208 -0.926 -0.791 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.44 : num [1:43, 1:2] -1.334 -1.161 -0.962 -0.723 -0.608 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.45 : num [1:43, 1:2] -1.325 -1.17 -0.991 -0.775 -0.673 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.46 : num [1:43, 1:2] -1.37 -1.226 -1.058 -0.857 -0.76 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.47 : num [1:43, 1:2] -1.215 -1.082 -0.928 -0.742 -0.653 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.48 : num [1:43, 1:2] -0.894 -0.77 -0.626 -0.452 -0.37 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.49 : num [1:43, 1:2] -0.961 -0.83 -0.678 -0.494 -0.406 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.50 : num [1:43, 1:2] -0.868 -0.75 -0.614 -0.45 -0.372 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.51 : num [1:43, 1:2] -0.729 -0.637 -0.53 -0.401 -0.339 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.52 : num [1:43, 1:2] -1.236 -1.11 -0.964 -0.788 -0.703 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.53 : num [1:43, 1:2] -1.026 -0.919 -0.796 -0.648 -0.576 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.54 : num [1:43, 1:2] -1.293 -1.146 -0.977 -0.774 -0.677 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.55 : num [1:43, 1:2] -1.414 -1.249 -1.058 -0.829 -0.72 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.56 : num [1:43, 1:2] -1.425 -1.273 -1.098 -0.886 -0.786 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.57 : num [1:43, 1:2] -1.573 -1.402 -1.204 -0.966 -0.853 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.58 : num [1:43, 1:2] -1.333 -1.182 -1.007 -0.796 -0.696 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.59 : num [1:43, 1:2] -1.094 -0.964 -0.813 -0.631 -0.544 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.60 : num [1:43, 1:2] -1.337 -1.188 -1.016 -0.809 -0.71 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.61 : num [1:43, 1:2] -1.149 -1.008 -0.845 -0.649 -0.556 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.62 : num [1:43, 1:2] -0.974 -0.853 -0.713 -0.544 -0.464 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.63 : num [1:43, 1:2] -1.228 -1.086 -0.922 -0.725 -0.631 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.64 : num [1:43, 1:2] -1.17 -1.016 -0.839 -0.626 -0.524 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.65 : num [1:43, 1:2] -1.11 -0.965 -0.797 -0.595 -0.498 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.66 : num [1:43, 1:2] -0.915 -0.778 -0.619 -0.428 -0.337 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.67 : num [1:43, 1:2] -0.539 -0.439 -0.323 -0.183 -0.115 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.68 : num [1:43, 1:2] -0.963 -0.843 -0.704 -0.537 -0.457 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.69 : num [1:43, 1:2] -1.109 -0.968 -0.806 -0.609 -0.515 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.70 : num [1:43, 1:2] -0.954 -0.828 -0.682 -0.506 -0.422 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.71 : num [1:43, 1:2] -0.833 -0.735 -0.622 -0.485 -0.419 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.72 : num [1:43, 1:2] -0.711 -0.622 -0.519 -0.394 -0.334 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.73 : num [1:43, 1:2] -0.949 -0.784 -0.595 -0.368 -0.259 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.74 : num [1:43, 1:2] -0.3453 -0.2587 -0.1585 -0.0367 0.0218 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.75 : num [1:43, 1:2] -1.505 -1.342 -1.152 -0.923 -0.813 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.76 : num [1:43, 1:2] -1.708 -1.522 -1.306 -1.047 -0.923 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.77 : num [1:43, 1:2] -1.345 -1.187 -1.004 -0.784 -0.679 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.78 : num [1:43, 1:2] -0.969 -0.861 -0.736 -0.585 -0.512 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.79 : num [1:43, 1:2] -1.08 -0.974 -0.852 -0.705 -0.634 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.80 : num [1:43, 1:2] -0.854 -0.749 -0.627 -0.48 -0.41 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.81 : num [1:43, 1:2] -0.938 -0.844 -0.737 -0.606 -0.543 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.82 : num [1:43, 1:2] -0.883 -0.766 -0.631 -0.468 -0.39 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.83 : num [1:43, 1:2] -1.203 -1.077 -0.931 -0.755 -0.672 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.84 : num [1:43, 1:2] -1.174 -1.039 -0.882 -0.693 -0.603 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.85 : num [1:43, 1:2] -1.187 -1.046 -0.885 -0.689 -0.596 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.86 : num [1:43, 1:2] -1.14 -1.005 -0.851 -0.664 -0.575 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.87 : num [1:43, 1:2] -1.257 -1.108 -0.936 -0.729 -0.63 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.88 : num [1:43, 1:2] -0.975 -0.863 -0.734 -0.577 -0.502 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.89 : num [1:43, 1:2] -1.33 -1.176 -0.999 -0.784 -0.681 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.90 : num [1:43, 1:2] -1.023 -0.913 -0.785 -0.63 -0.556 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.91 : num [1:43, 1:2] -1.114 -0.991 -0.849 -0.678 -0.597 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.92 : num [1:43, 1:2] -1.039 -0.919 -0.78 -0.613 -0.533 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.93 : num [1:43, 1:2] -1.274 -1.128 -0.959 -0.755 -0.658 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.94 : num [1:43, 1:2] -1.275 -1.094 -0.885 -0.635 -0.516 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.95 : num [1:43, 1:2] -1.153 -1.007 -0.837 -0.633 -0.536 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.96 : num [1:43, 1:2] -1.161 -0.987 -0.786 -0.545 -0.43 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.97 : num [1:43, 1:2] -0.867 -0.724 -0.559 -0.361 -0.267 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.98 : num [1:43, 1:2] -1.219 -1.082 -0.924 -0.734 -0.643 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.99 : num [1:43, 1:2] -1.233 -1.096 -0.939 -0.749 -0.658 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. .. [list output truncated]
## $ size.random :List of 1
## ..$ :List of 5
## .. ..$ n : num 7169
## .. ..$ N : num 7169
## .. ..$ Ntotal: num 28676
## .. ..$ ngroup: num 1
## .. ..$ nrep : num 4
## $ summary.linear.predictor :'data.frame': 43213 obs. of 7 variables:
## ..$ mean : num [1:43213] 2.95 2.8 2.94 2.99 2.78 ...
## ..$ sd : num [1:43213] 0.16 0.261 0.249 0.276 0.258 ...
## ..$ 0.025quant: num [1:43213] 2.63 2.29 2.46 2.45 2.27 ...
## ..$ 0.5quant : num [1:43213] 2.95 2.8 2.94 2.99 2.78 ...
## ..$ 0.975quant: num [1:43213] 3.26 3.31 3.43 3.54 3.28 ...
## ..$ mode : num [1:43213] 2.95 2.8 2.94 2.99 2.78 ...
## ..$ kld : num [1:43213] 3.53e-10 8.00e-10 2.28e-10 2.48e-10 9.40e-10 ...
## $ marginals.linear.predictor : NULL
## $ summary.fitted.values :'data.frame': 43213 obs. of 6 variables:
## ..$ mean : num [1:43213] 19.3 17 19.6 20.8 16.6 ...
## ..$ sd : num [1:43213] 3.12 4.51 4.96 5.85 4.35 ...
## ..$ 0.025quant: num [1:43213] 13.93 9.85 11.66 11.62 9.67 ...
## ..$ 0.5quant : num [1:43213] 19.1 16.5 19 20 16.1 ...
## ..$ 0.975quant: num [1:43213] 26.1 27.4 31 34.4 26.6 ...
## ..$ mode : num [1:43213] 18.6 15.4 17.9 18.5 15 ...
## $ marginals.fitted.values : NULL
## $ size.linear.predictor :List of 5
## ..$ n : num 28678
## ..$ N : num 28678
## ..$ Ntotal: num 43213
## ..$ ngroup: num 1
## ..$ nrep : num 2
## $ summary.hyperpar :'data.frame': 3 obs. of 6 variables:
## ..$ mean : num [1:3] 1.706 -0.359 -0.101
## ..$ sd : num [1:3] 0.0276 0.1026 0.2724
## ..$ 0.025quant: num [1:3] 1.653 -0.574 -0.675
## ..$ 0.5quant : num [1:3] 1.7062 -0.3551 -0.0888
## ..$ 0.975quant: num [1:3] 1.762 -0.172 0.393
## ..$ mode : num [1:3] 1.7056 -0.3344 -0.0286
## $ marginals.hyperpar :List of 3
## ..$ size for the nbinomial observations (1/overdispersion): num [1:43, 1:2] 1.59 1.61 1.62 1.64 1.65 ...
## .. ..- attr(*, "hyperid")= chr "63001|INLA.Data1"
## .. ..- attr(*, "dimnames")=List of 2
## .. .. ..$ : NULL
## .. .. ..$ : chr [1:2] "x" "y"
## ..$ Theta1 for field : num [1:43, 1:2] -0.846 -0.781 -0.707 -0.617 -0.574 ...
## .. ..- attr(*, "hyperid")= chr ""
## .. ..- attr(*, "dimnames")=List of 2
## .. .. ..$ : NULL
## .. .. ..$ : chr [1:2] "x" "y"
## ..$ Theta2 for field : num [1:43, 1:2] -1.404 -1.23 -1.031 -0.79 -0.675 ...
## .. ..- attr(*, "hyperid")= chr ""
## .. ..- attr(*, "dimnames")=List of 2
## .. .. ..$ : NULL
## .. .. ..$ : chr [1:2] "x" "y"
## $ internal.summary.hyperpar :'data.frame': 3 obs. of 6 variables:
## ..$ mean : num [1:3] 0.534 -0.36 -0.104
## ..$ sd : num [1:3] 0.0162 0.1025 0.2722
## ..$ 0.025quant: num [1:3] 0.503 -0.574 -0.675
## ..$ 0.5quant : num [1:3] 0.5343 -0.3551 -0.0888
## ..$ 0.975quant: num [1:3] 0.566 -0.172 0.393
## ..$ mode : num [1:3] 0.5342 -0.3357 -0.0323
## $ internal.marginals.hyperpar:List of 3
## ..$ log size for the nbinomial observations (1/overdispersion): num [1:43, 1:2] 0.465 0.474 0.484 0.497 0.503 ...
## .. ..- attr(*, "hyperid")= chr "63001|INLA.Data1"
## .. ..- attr(*, "dimnames")=List of 2
## .. .. ..$ : NULL
## .. .. ..$ : chr [1:2] "x" "y"
## ..$ Theta1 for field : num [1:43, 1:2] -0.846 -0.781 -0.707 -0.617 -0.574 ...
## .. ..- attr(*, "hyperid")= chr ""
## .. ..- attr(*, "dimnames")=List of 2
## .. .. ..$ : NULL
## .. .. ..$ : chr [1:2] "x" "y"
## ..$ Theta2 for field : num [1:43, 1:2] -1.404 -1.23 -1.031 -0.79 -0.675 ...
## .. ..- attr(*, "hyperid")= chr ""
## .. ..- attr(*, "dimnames")=List of 2
## .. .. ..$ : NULL
## .. .. ..$ : chr [1:2] "x" "y"
## $ offset.linear.predictor : num [1:43213] 0 0 0 0 0 0 0 0 0 0 ...
## $ model.spde2.blc : NULL
## $ summary.spde2.blc : list()
## $ marginals.spde2.blc : NULL
## $ size.spde2.blc : NULL
## $ model.spde3.blc : NULL
## $ summary.spde3.blc : list()
## $ marginals.spde3.blc : NULL
## $ size.spde3.blc : NULL
## $ logfile : chr [1:2514] "[PANUA] PARDISO License is expired." "[PANUA] Please obtain a new PARDISO license at https://www.panua.ch/products/pardiso" " Read ntt 24 1 with max.threads 24" " Found num.threads = 24:1 max_threads = 24" ...
## $ misc :List of 22
## ..$ cov.intern : num [1:3, 1:3] 0.000262 -0.000118 -0.00091 -0.000118 0.010136 ...
## ..$ cor.intern : num [1:3, 1:3] 1 -0.0723 -0.2113 -0.0723 1 ...
## ..$ cov.intern.eigenvalues : num [1:3] 0.000223 0.001511 0.0793
## ..$ cov.intern.eigenvectors : num [1:3, 1:3] 0.9885 -0.1386 0.0609 -0.151 -0.9325 ...
## ..$ reordering : int [1:28678] 7069 7140 4596 4553 4511 4447 4597 4593 4482 4488 ...
## ..$ theta.tags : chr [1:3] "log size for the nbinomial observations (1/overdispersion)" "Theta1 for field" "Theta2 for field"
## ..$ log.posterior.mode : num -56720
## ..$ stdev.corr.negative : num [1:3] 0.994 0.943 1.205
## ..$ stdev.corr.positive : num [1:3] 1.01 1.06 0.83
## ..$ to.theta :List of 3
## .. ..$ log size for the nbinomial observations (1/overdispersion):function (x)
## .. ..$ Theta1 for field :function (x)
## .. ..$ Theta2 for field :function (x)
## ..$ from.theta :List of 3
## .. ..$ log size for the nbinomial observations (1/overdispersion):function (x)
## .. ..$ Theta1 for field :function (x)
## .. ..$ Theta2 for field :function (x)
## ..$ mode.status : num 0
## ..$ lincomb.derived.correlation.matrix: NULL
## ..$ lincomb.derived.covariance.matrix : NULL
## ..$ opt.directions : num [1:3, 1:3] 0.358 0.261 0.896 0.647 0.623 ...
## .. ..- attr(*, "dimnames")=List of 2
## .. .. ..$ : chr [1:3] "theta:1" "theta:2" "theta:3"
## .. .. ..$ : chr [1:3] "dir:1" "dir:2" "dir:3"
## ..$ configs :List of 17
## .. ..$ .preopt : logi TRUE
## .. ..$ lite : logi FALSE
## .. ..$ mpred : int 14535
## .. ..$ npred : int 28678
## .. ..$ mnpred : int 43213
## .. ..$ Npred : int 14535
## .. ..$ n : int 28678
## .. ..$ nz : int 80857
## .. ..$ prior_nz : int 64098
## .. ..$ ntheta : int 3
## .. ..$ nconfig : int 15
## .. ..$ offsets : num [1:43213] 0 0 0 0 0 0 0 0 0 0 ...
## .. ..$ contents :List of 3
## .. .. ..$ tag : chr [1:5] "APredictor" "Predictor" "field" "Intercept" ...
## .. .. ..$ start : int [1:5] 1 14536 43214 71890 71891
## .. .. ..$ length: int [1:5] 14535 28678 28676 1 1
## .. ..$ A :Formal class 'dgTMatrix' [package "Matrix"] with 6 slots
## .. .. .. ..@ i : int [1:28678] 2 3 4 5 6 7 8 9 10 11 ...
## .. .. .. ..@ j : int [1:28678] 0 1 2 3 4 5 6 7 8 9 ...
## .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. ..$ : NULL
## .. .. .. .. ..$ : NULL
## .. .. .. ..@ x : num [1:28678] 1 1 1 1 1 1 1 1 1 1 ...
## .. .. .. ..@ factors : list()
## .. ..$ pA :Formal class 'dgTMatrix' [package "Matrix"] with 6 slots
## .. .. .. ..@ i : int [1:58126] 0 1 2 3 4 5 6 7 8 9 ...
## .. .. .. ..@ j : int [1:58126] 0 0 0 0 0 0 0 0 0 0 ...
## .. .. .. ..@ Dim : int [1:2] 14535 28678
## .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. ..$ : NULL
## .. .. .. .. ..$ : NULL
## .. .. .. ..@ x : num [1:58126] 1 1 1 1 1 1 1 1 1 1 ...
## .. .. .. ..@ factors : list()
## .. ..$ config :List of 15
## .. .. ..$ :List of 15
## .. .. .. ..$ theta : Named num [1:3] 0.5342 -0.3321 -0.0219
## .. .. .. .. ..- attr(*, "names")= chr [1:3] "log size for the nbinomial observations (1/overdispersion)" "Theta1 for field" "Theta2 for field"
## .. .. .. ..$ log.posterior : num -3.41
## .. .. .. ..$ log.posterior.orig: num 0
## .. .. .. ..$ mean : num [1:28678] 0.08 0.0208 0.0145 0.022 0.0266 ...
## .. .. .. ..$ improved.mean : num [1:28678] 0.06252 0.00352 0.00163 0.00937 0.01364 ...
## .. .. .. ..$ skewness : logi [1:28678] NA NA NA NA NA NA ...
## .. .. .. ..$ Q :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:80857] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:80857] 49.4 -25.8 107.5 156.1 -59.9 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ Qinv :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:80857] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:80857] 0.0364 0.0183 0.0285 0.0466 0.0419 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ Qprior :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:64098] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:64098] 48.2 -26.2 103.1 156.1 -59.9 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ cpodens.moments : num[0 , 1:3]
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "mean" "variance" "skewness"
## .. .. .. ..$ gcpodens.moments : num[0 , 1:3]
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "mean" "variance" "log.theta.correction"
## .. .. .. ..$ arg.str : NULL
## .. .. .. ..$ ll.info : num [1:14535, 1:3] -1.566 -0.413 0.421 0.956 -1.542 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "gradient" "hessian" "deriv3"
## .. .. .. ..$ APredictor : num [1:14535, 1:2] 2.95 2.8 2.95 3 2.78 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:2] "mean" "variance"
## .. .. .. ..$ Predictor : num [1:28678, 1:2] 2.92512 0.11843 0.06252 0.00352 0.00163 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:2] "mean" "variance"
## .. .. ..$ :List of 15
## .. .. .. ..$ theta : Named num [1:3] 0.5625 -0.336 -0.0202
## .. .. .. .. ..- attr(*, "names")= chr [1:3] "log size for the nbinomial observations (1/overdispersion)" "Theta1 for field" "Theta2 for field"
## .. .. .. ..$ log.posterior : num -4.48
## .. .. .. ..$ log.posterior.orig: num -1.81
## .. .. .. ..$ mean : num [1:28678] 0.0801 0.0204 0.0142 0.0218 0.0264 ...
## .. .. .. ..$ improved.mean : num [1:28678] 0.06293 0.00341 0.00147 0.00931 0.01361 ...
## .. .. .. ..$ skewness : logi [1:28678] NA NA NA NA NA NA ...
## .. .. .. ..$ Q :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:80857] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:80857] 49.9 -26 108.6 157.6 -60.5 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ Qinv :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:80857] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:80857] 0.0359 0.018 0.028 0.0461 0.0414 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ Qprior :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:64098] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:64098] 48.7 -26.4 104.1 157.6 -60.5 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ cpodens.moments : num[0 , 1:3]
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "mean" "variance" "skewness"
## .. .. .. ..$ gcpodens.moments : num[0 , 1:3]
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "mean" "variance" "log.theta.correction"
## .. .. .. ..$ arg.str : NULL
## .. .. .. ..$ ll.info : num [1:14535, 1:3] -1.607 -0.422 0.43 0.977 -1.582 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "gradient" "hessian" "deriv3"
## .. .. .. ..$ APredictor : num [1:14535, 1:2] 2.95 2.8 2.95 3 2.78 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:2] "mean" "variance"
## .. .. .. ..$ Predictor : num [1:28678, 1:2] 2.92473 0.11802 0.06293 0.00341 0.00147 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:2] "mean" "variance"
## .. .. ..$ :List of 15
## .. .. .. ..$ theta : Named num [1:3] 0.5062 -0.3281 -0.0236
## .. .. .. .. ..- attr(*, "names")= chr [1:3] "log size for the nbinomial observations (1/overdispersion)" "Theta1 for field" "Theta2 for field"
## .. .. .. ..$ log.posterior : num -4.53
## .. .. .. ..$ log.posterior.orig: num -1.85
## .. .. .. ..$ mean : num [1:28678] 0.0799 0.0213 0.0149 0.0223 0.0268 ...
## .. .. .. ..$ improved.mean : num [1:28678] 0.06211 0.00362 0.00178 0.00944 0.01366 ...
## .. .. .. ..$ skewness : logi [1:28678] NA NA NA NA NA NA ...
## .. .. .. ..$ Q :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:80857] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:80857] 48.9 -25.6 106.4 154.6 -59.3 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ Qinv :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:80857] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:80857] 0.0368 0.0186 0.0289 0.0471 0.0424 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ Qprior :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:64098] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:64098] 47.7 -25.9 102.1 154.6 -59.3 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ cpodens.moments : num[0 , 1:3]
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "mean" "variance" "skewness"
## .. .. .. ..$ gcpodens.moments : num[0 , 1:3]
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "mean" "variance" "log.theta.correction"
## .. .. .. ..$ arg.str : NULL
## .. .. .. ..$ ll.info : num [1:14535, 1:3] -1.526 -0.403 0.412 0.936 -1.504 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "gradient" "hessian" "deriv3"
## .. .. .. ..$ APredictor : num [1:14535, 1:2] 2.95 2.8 2.94 2.99 2.78 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:2] "mean" "variance"
## .. .. .. ..$ Predictor : num [1:28678, 1:2] 2.92552 0.11885 0.06211 0.00362 0.00178 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:2] "mean" "variance"
## .. .. ..$ :List of 15
## .. .. .. ..$ theta : Named num [1:3] 0.52233 -0.40528 0.00385
## .. .. .. .. ..- attr(*, "names")= chr [1:3] "log size for the nbinomial observations (1/overdispersion)" "Theta1 for field" "Theta2 for field"
## .. .. .. ..$ log.posterior : num -4.51
## .. .. .. ..$ log.posterior.orig: num -1.84
## .. .. .. ..$ mean : num [1:28678] 0.0784 0.0248 0.0213 0.0278 0.0319 ...
## .. .. .. ..$ improved.mean : num [1:28678] 0.063 0.00957 0.01008 0.01683 0.02068 ...
## .. .. .. ..$ skewness : logi [1:28678] NA NA NA NA NA NA ...
## .. .. .. ..$ Q :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:80857] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:80857] 58.4 -30.7 126.8 185.4 -71.2 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ Qinv :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:80857] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:80857] 0.032 0.0167 0.0256 0.0403 0.0363 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ Qprior :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:64098] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:64098] 57.3 -31.1 122.5 185.4 -71.2 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ cpodens.moments : num[0 , 1:3]
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "mean" "variance" "skewness"
## .. .. .. ..$ gcpodens.moments : num[0 , 1:3]
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "mean" "variance" "log.theta.correction"
## .. .. .. ..$ arg.str : NULL
## .. .. .. ..$ ll.info : num [1:14535, 1:3] -1.549 -0.424 0.428 0.976 -1.527 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "gradient" "hessian" "deriv3"
## .. .. .. ..$ APredictor : num [1:14535, 1:2] 2.95 2.82 2.94 2.98 2.79 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:2] "mean" "variance"
## .. .. .. ..$ Predictor : num [1:28678, 1:2] 2.92456 0.12141 0.063 0.00957 0.01008 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:2] "mean" "variance"
## .. .. ..$ :List of 15
## .. .. .. ..$ theta : Named num [1:3] 0.5447 -0.2669 -0.0448
## .. .. .. .. ..- attr(*, "names")= chr [1:3] "log size for the nbinomial observations (1/overdispersion)" "Theta1 for field" "Theta2 for field"
## .. .. .. ..$ log.posterior : num -4.52
## .. .. .. ..$ log.posterior.orig: num -1.84
## .. .. .. ..$ mean : num [1:28678] 0.0808 0.01681 0.00798 0.01643 0.02135 ...
## .. .. .. ..$ improved.mean : num [1:28678] 0.06138 -0.00249 -0.0066 0.00212 0.00673 ...
## .. .. .. ..$ skewness : logi [1:28678] NA NA NA NA NA NA ...
## .. .. .. ..$ Q :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:80857] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:80857] 42.6 -22.1 92.9 134 -51.4 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ Qinv :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:80857] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:80857] 0.0408 0.0197 0.0312 0.053 0.0475 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ Qprior :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:64098] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:64098] 41.4 -22.4 88.5 134 -51.4 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ cpodens.moments : num[0 , 1:3]
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "mean" "variance" "skewness"
## .. .. .. ..$ gcpodens.moments : num[0 , 1:3]
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "mean" "variance" "log.theta.correction"
## .. .. .. ..$ arg.str : NULL
## .. .. .. ..$ ll.info : num [1:14535, 1:3] -1.581 -0.4 0.414 0.936 -1.555 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "gradient" "hessian" "deriv3"
## .. .. .. ..$ APredictor : num [1:14535, 1:2] 2.95 2.79 2.95 3.01 2.77 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:2] "mean" "variance"
## .. .. .. ..$ Predictor : num [1:28678, 1:2] 2.92553 0.1157 0.06138 -0.00249 -0.0066 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:2] "mean" "variance"
## .. .. ..$ :List of 15
## .. .. .. ..$ theta : Named num [1:3] 0.529 -0.184 0.398
## .. .. .. .. ..- attr(*, "names")= chr [1:3] "log size for the nbinomial observations (1/overdispersion)" "Theta1 for field" "Theta2 for field"
## .. .. .. ..$ log.posterior : num -4.36
## .. .. .. ..$ log.posterior.orig: num -1.69
## .. .. .. ..$ mean : num [1:28678] 0.0812 0.0251 0.045 0.0525 0.0567 ...
## .. .. .. ..$ improved.mean : num [1:28678] 0.06401 0.00797 0.03065 0.03845 0.04229 ...
## .. .. .. ..$ skewness : logi [1:28678] NA NA NA NA NA NA ...
## .. .. .. ..$ Q :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:80857] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:80857] 55.6 -29.2 120.7 176.4 -67.7 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ Qinv :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:80857] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:80857] 0.034 0.018 0.0273 0.0452 0.0411 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ Qprior :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:64098] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:64098] 54.4 -29.6 116.4 176.4 -67.7 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ cpodens.moments : num[0 , 1:3]
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "mean" "variance" "skewness"
## .. .. .. ..$ gcpodens.moments : num[0 , 1:3]
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "mean" "variance" "log.theta.correction"
## .. .. .. ..$ arg.str : NULL
## .. .. .. ..$ ll.info : num [1:14535, 1:3] -1.56 -0.462 0.363 0.898 -1.537 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "gradient" "hessian" "deriv3"
## .. .. .. ..$ APredictor : num [1:14535, 1:2] 2.96 2.85 2.97 3.02 2.79 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:2] "mean" "variance"
## .. .. .. ..$ Predictor : num [1:28678, 1:2] 2.92762 0.11219 0.06401 0.00797 0.03065 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:2] "mean" "variance"
## .. .. ..$ :List of 15
## .. .. .. ..$ theta : Named num [1:3] 0.542 -0.548 -0.631
## .. .. .. .. ..- attr(*, "names")= chr [1:3] "log size for the nbinomial observations (1/overdispersion)" "Theta1 for field" "Theta2 for field"
## .. .. .. ..$ log.posterior : num -5.05
## .. .. .. ..$ log.posterior.orig: num -2.38
## .. .. .. ..$ mean : num [1:28678] 0.07445 0.01347 -0.01895 -0.01073 -0.00807 ...
## .. .. .. ..$ improved.mean : num [1:28678] 0.05829 -0.00256 -0.02734 -0.01895 -0.01638 ...
## .. .. .. ..$ skewness : logi [1:28678] NA NA NA NA NA NA ...
## .. .. .. ..$ Q :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:80857] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:80857] 41.9 -21.5 91.4 131.1 -50.1 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ Qinv :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:80857] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:80857] 0.0398 0.0184 0.0298 0.0461 0.0405 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ Qprior :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:64098] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:64098] 40.7 -21.9 86.9 131.1 -50.1 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ cpodens.moments : num[0 , 1:3]
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "mean" "variance" "skewness"
## .. .. .. ..$ gcpodens.moments : num[0 , 1:3]
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "mean" "variance" "log.theta.correction"
## .. .. .. ..$ arg.str : NULL
## .. .. .. ..$ ll.info : num [1:14535, 1:3] -1.575 -0.357 0.49 1.028 -1.549 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "gradient" "hessian" "deriv3"
## .. .. .. ..$ APredictor : num [1:14535, 1:2] 2.94 2.76 2.92 2.97 2.76 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:2] "mean" "variance"
## .. .. .. ..$ Predictor : num [1:28678, 1:2] 2.92056 0.13294 0.05829 -0.00256 -0.02734 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:2] "mean" "variance"
## .. .. ..$ :List of 15
## .. .. .. ..$ theta : Named num [1:3] 0.528 -0.417 -0.388
## .. .. .. .. ..- attr(*, "names")= chr [1:3] "log size for the nbinomial observations (1/overdispersion)" "Theta1 for field" "Theta2 for field"
## .. .. .. ..$ log.posterior : num -4.12
## .. .. .. ..$ log.posterior.orig: num -1.45
## .. .. .. ..$ mean : num [1:28678] 0.07806 0.01499 -0.01101 -0.00269 0.00127 ...
## .. .. .. ..$ improved.mean : num [1:28678] 0.05976 -0.00319 -0.02248 -0.01394 -0.01017 ...
## .. .. .. ..$ skewness : logi [1:28678] NA NA NA NA NA NA ...
## .. .. .. ..$ Q :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:80857] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:80857] 40.9 -21.1 89.4 128.4 -49.2 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ Qinv :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:80857] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:80857] 0.0414 0.0194 0.0312 0.0508 0.0451 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ Qprior :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:64098] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:64098] 39.7 -21.5 85 128.4 -49.2 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ cpodens.moments : num[0 , 1:3]
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "mean" "variance" "skewness"
## .. .. .. ..$ gcpodens.moments : num[0 , 1:3]
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "mean" "variance" "log.theta.correction"
## .. .. .. ..$ arg.str : NULL
## .. .. .. ..$ ll.info : num [1:14535, 1:3] -1.557 -0.364 0.455 0.976 -1.531 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "gradient" "hessian" "deriv3"
## .. .. .. ..$ APredictor : num [1:14535, 1:2] 2.94 2.77 2.93 2.99 2.76 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:2] "mean" "variance"
## .. .. .. ..$ Predictor : num [1:28678, 1:2] 2.92294 0.12499 0.05976 -0.00319 -0.02248 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:2] "mean" "variance"
## .. .. ..$ :List of 15
## .. .. .. ..$ theta : Named num [1:3] 0.521 -0.206 0.206
## .. .. .. .. ..- attr(*, "names")= chr [1:3] "log size for the nbinomial observations (1/overdispersion)" "Theta1 for field" "Theta2 for field"
## .. .. .. ..$ log.posterior : num -4.47
## .. .. .. ..$ log.posterior.orig: num -1.8
## .. .. .. ..$ mean : num [1:28678] 0.0813 0.0212 0.0285 0.0364 0.0411 ...
## .. .. .. ..$ improved.mean : num [1:28678] 0.06264 0.00263 0.01343 0.02165 0.02599 ...
## .. .. .. ..$ skewness : logi [1:28678] NA NA NA NA NA NA ...
## .. .. .. ..$ Q :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:80857] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:80857] 48.2 -25.2 105 152.5 -58.6 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ Qinv :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:80857] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:80857] 0.0376 0.0191 0.0296 0.0497 0.0449 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ Qprior :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:64098] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:64098] 47.1 -25.6 100.7 152.5 -58.6 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ cpodens.moments : num[0 , 1:3]
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "mean" "variance" "skewness"
## .. .. .. ..$ gcpodens.moments : num[0 , 1:3]
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "mean" "variance" "log.theta.correction"
## .. .. .. ..$ arg.str : NULL
## .. .. .. ..$ ll.info : num [1:14535, 1:3] -1.548 -0.429 0.379 0.901 -1.524 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "gradient" "hessian" "deriv3"
## .. .. .. ..$ APredictor : num [1:14535, 1:2] 2.95 2.82 2.96 3.01 2.78 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:2] "mean" "variance"
## .. .. .. ..$ Predictor : num [1:28678, 1:2] 2.92722 0.11304 0.06264 0.00263 0.01343 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:2] "mean" "variance"
## .. .. ..$ :List of 15
## .. .. .. ..$ theta : Named num [1:3] 0.515 -0.497 -0.36
## .. .. .. .. ..- attr(*, "names")= chr [1:3] "log size for the nbinomial observations (1/overdispersion)" "Theta1 for field" "Theta2 for field"
## .. .. .. ..$ log.posterior : num -4.61
## .. .. .. ..$ log.posterior.orig: num -1.94
## .. .. .. ..$ mean : num [1:28678] 0.07649 0.01917 -0.00462 0.00249 0.0062 ...
## .. .. .. ..$ improved.mean : num [1:28678] 0.06059 0.00339 -0.01436 -0.00706 -0.00353 ...
## .. .. .. ..$ skewness : logi [1:28678] NA NA NA NA NA NA ...
## .. .. .. ..$ Q :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:80857] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:80857] 49.1 -25.6 106.8 154.9 -59.4 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ Qinv :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:80857] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:80857] 0.0359 0.0177 0.0278 0.0432 0.0384 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ Qprior :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:64098] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:64098] 47.9 -25.9 102.5 154.9 -59.4 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ cpodens.moments : num[0 , 1:3]
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "mean" "variance" "skewness"
## .. .. .. ..$ gcpodens.moments : num[0 , 1:3]
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "mean" "variance" "log.theta.correction"
## .. .. .. ..$ arg.str : NULL
## .. .. .. ..$ ll.info : num [1:14535, 1:3] -1.539 -0.376 0.466 1.005 -1.515 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "gradient" "hessian" "deriv3"
## .. .. .. ..$ APredictor : num [1:14535, 1:2] 2.95 2.78 2.92 2.97 2.77 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:2] "mean" "variance"
## .. .. .. ..$ Predictor : num [1:28678, 1:2] 2.92251 0.12806 0.06059 0.00339 -0.01436 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:2] "mean" "variance"
## .. .. ..$ :List of 15
## .. .. .. ..$ theta : Named num [1:3] 0.508 -0.286 0.234
## .. .. .. .. ..- attr(*, "names")= chr [1:3] "log size for the nbinomial observations (1/overdispersion)" "Theta1 for field" "Theta2 for field"
## .. .. .. ..$ log.posterior : num -4.67
## .. .. .. ..$ log.posterior.orig: num -2
## .. .. .. ..$ mean : num [1:28678] 0.08 0.0261 0.0369 0.0438 0.0479 ...
## .. .. .. ..$ improved.mean : num [1:28678] 0.06364 0.00982 0.02392 0.03107 0.03488 ...
## .. .. .. ..$ skewness : logi [1:28678] NA NA NA NA NA NA ...
## .. .. .. ..$ Q :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:80857] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:80857] 57.9 -30.5 125.7 184 -70.7 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ Qinv :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:80857] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:80857] 0.0327 0.0174 0.0264 0.0426 0.0386 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ Qprior :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:64098] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:64098] 56.8 -30.9 121.4 184 -70.7 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ cpodens.moments : num[0 , 1:3]
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "mean" "variance" "skewness"
## .. .. .. ..$ gcpodens.moments : num[0 , 1:3]
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "mean" "variance" "log.theta.correction"
## .. .. .. ..$ arg.str : NULL
## .. .. .. ..$ ll.info : num [1:14535, 1:3] -1.53 -0.442 0.384 0.919 -1.508 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "gradient" "hessian" "deriv3"
## .. .. .. ..$ APredictor : num [1:14535, 1:2] 2.95 2.84 2.96 3 2.79 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:2] "mean" "variance"
## .. .. .. ..$ Predictor : num [1:28678, 1:2] 2.92651 0.11639 0.06364 0.00982 0.02392 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:2] "mean" "variance"
## .. .. ..$ :List of 15
## .. .. .. ..$ theta : Named num [1:3] 0.561 -0.421 -0.386
## .. .. .. .. ..- attr(*, "names")= chr [1:3] "log size for the nbinomial observations (1/overdispersion)" "Theta1 for field" "Theta2 for field"
## .. .. .. ..$ log.posterior : num -4.17
## .. .. .. ..$ log.posterior.orig: num -1.49
## .. .. .. ..$ mean : num [1:28678] 0.07814 0.01451 -0.0114 -0.00296 0.00104 ...
## .. .. .. ..$ improved.mean : num [1:28678] 0.0602 -0.0033 -0.0227 -0.014 -0.0102 ...
## .. .. .. ..$ skewness : logi [1:28678] NA NA NA NA NA NA ...
## .. .. .. ..$ Q :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:80857] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:80857] 41.4 -21.3 90.4 129.8 -49.8 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ Qinv :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:80857] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:80857] 0.0408 0.0191 0.0307 0.0502 0.0445 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ Qprior :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:64098] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:64098] 40.2 -21.7 85.9 129.8 -49.8 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ cpodens.moments : num[0 , 1:3]
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "mean" "variance" "skewness"
## .. .. .. ..$ gcpodens.moments : num[0 , 1:3]
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "mean" "variance" "log.theta.correction"
## .. .. .. ..$ arg.str : NULL
## .. .. .. ..$ ll.info : num [1:14535, 1:3] -1.604 -0.373 0.466 1 -1.577 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "gradient" "hessian" "deriv3"
## .. .. .. ..$ APredictor : num [1:14535, 1:2] 2.94 2.76 2.93 2.99 2.76 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:2] "mean" "variance"
## .. .. .. ..$ Predictor : num [1:28678, 1:2] 2.9224 0.1245 0.0602 -0.0033 -0.0227 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:2] "mean" "variance"
## .. .. ..$ :List of 15
## .. .. .. ..$ theta : Named num [1:3] 0.554 -0.211 0.208
## .. .. .. .. ..- attr(*, "names")= chr [1:3] "log size for the nbinomial observations (1/overdispersion)" "Theta1 for field" "Theta2 for field"
## .. .. .. ..$ log.posterior : num -4.49
## .. .. .. ..$ log.posterior.orig: num -1.81
## .. .. .. ..$ mean : num [1:28678] 0.0814 0.0207 0.0279 0.036 0.0407 ...
## .. .. .. ..$ improved.mean : num [1:28678] 0.06309 0.00249 0.01319 0.02152 0.02591 ...
## .. .. .. ..$ skewness : logi [1:28678] NA NA NA NA NA NA ...
## .. .. .. ..$ Q :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:80857] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:80857] 48.8 -25.5 106.2 154.2 -59.2 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ Qinv :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:80857] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:80857] 0.0371 0.0187 0.029 0.0491 0.0443 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ Qprior :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:64098] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:64098] 47.6 -25.9 101.8 154.2 -59.2 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ cpodens.moments : num[0 , 1:3]
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "mean" "variance" "skewness"
## .. .. .. ..$ gcpodens.moments : num[0 , 1:3]
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "mean" "variance" "log.theta.correction"
## .. .. .. ..$ arg.str : NULL
## .. .. .. ..$ ll.info : num [1:14535, 1:3] -1.595 -0.441 0.389 0.924 -1.57 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "gradient" "hessian" "deriv3"
## .. .. .. ..$ APredictor : num [1:14535, 1:2] 2.95 2.82 2.96 3.01 2.78 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:2] "mean" "variance"
## .. .. .. ..$ Predictor : num [1:28678, 1:2] 2.92674 0.11257 0.06309 0.00249 0.01319 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:2] "mean" "variance"
## .. .. ..$ :List of 15
## .. .. .. ..$ theta : Named num [1:3] 0.548 -0.501 -0.358
## .. .. .. .. ..- attr(*, "names")= chr [1:3] "log size for the nbinomial observations (1/overdispersion)" "Theta1 for field" "Theta2 for field"
## .. .. .. ..$ log.posterior : num -4.72
## .. .. .. ..$ log.posterior.orig: num -2.05
## .. .. .. ..$ mean : num [1:28678] 0.07669 0.01879 -0.00494 0.00227 0.00602 ...
## .. .. .. ..$ improved.mean : num [1:28678] 0.06109 0.00331 -0.01455 -0.00715 -0.00357 ...
## .. .. .. ..$ skewness : logi [1:28678] NA NA NA NA NA NA ...
## .. .. .. ..$ Q :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:80857] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:80857] 49.7 -25.8 108.1 156.7 -60 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ Qinv :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:80857] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:80857] 0.0354 0.0174 0.0274 0.0427 0.038 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ Qprior :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:64098] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:64098] 48.5 -26.2 103.6 156.7 -60 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ cpodens.moments : num[0 , 1:3]
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "mean" "variance" "skewness"
## .. .. .. ..$ gcpodens.moments : num[0 , 1:3]
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "mean" "variance" "log.theta.correction"
## .. .. .. ..$ arg.str : NULL
## .. .. .. ..$ ll.info : num [1:14535, 1:3] -1.585 -0.387 0.478 1.031 -1.56 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "gradient" "hessian" "deriv3"
## .. .. .. ..$ APredictor : num [1:14535, 1:2] 2.95 2.78 2.92 2.97 2.77 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:2] "mean" "variance"
## .. .. .. ..$ Predictor : num [1:28678, 1:2] 2.92207 0.12759 0.06109 0.00331 -0.01455 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:2] "mean" "variance"
## .. .. ..$ :List of 15
## .. .. .. ..$ theta : Named num [1:3] 0.541 -0.291 0.236
## .. .. .. .. ..- attr(*, "names")= chr [1:3] "log size for the nbinomial observations (1/overdispersion)" "Theta1 for field" "Theta2 for field"
## .. .. .. ..$ log.posterior : num -4.65
## .. .. .. ..$ log.posterior.orig: num -1.98
## .. .. .. ..$ mean : num [1:28678] 0.0802 0.0256 0.0365 0.0435 0.0476 ...
## .. .. .. ..$ improved.mean : num [1:28678] 0.06411 0.00969 0.02373 0.03098 0.03484 ...
## .. .. .. ..$ skewness : logi [1:28678] NA NA NA NA NA NA ...
## .. .. .. ..$ Q :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:80857] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:80857] 58.6 -30.8 127.2 186 -71.4 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ Qinv :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:80857] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:80857] 0.0322 0.017 0.0259 0.042 0.0381 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ Qprior :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:64098] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:64098] 57.4 -31.2 122.8 186 -71.4 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ cpodens.moments : num[0 , 1:3]
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "mean" "variance" "skewness"
## .. .. .. ..$ gcpodens.moments : num[0 , 1:3]
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "mean" "variance" "log.theta.correction"
## .. .. .. ..$ arg.str : NULL
## .. .. .. ..$ ll.info : num [1:14535, 1:3] -1.576 -0.455 0.394 0.943 -1.553 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "gradient" "hessian" "deriv3"
## .. .. .. ..$ APredictor : num [1:14535, 1:2] 2.95 2.83 2.96 3 2.79 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:2] "mean" "variance"
## .. .. .. ..$ Predictor : num [1:28678, 1:2] 2.92611 0.11594 0.06411 0.00969 0.02373 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:2] "mean" "variance"
## .. ..$ max.log.posterior: num -56720
## ..$ nfunc : num 222
## ..$ warnings : chr(0)
## ..$ opt.trace :List of 3
## .. ..$ f : Named num [1:51] 62248 62222 62210 58004 58003 ...
## .. .. ..- attr(*, "names")= chr [1:51] "iter1" "iter2" "iter3" "iter4" ...
## .. ..$ nfunc: Named int [1:51] 1 2 3 5 7 10 11 12 14 15 ...
## .. .. ..- attr(*, "names")= chr [1:51] "iter1" "iter2" "iter3" "iter4" ...
## .. ..$ theta: num [1:51, 1:3] 2.31 2.3 2.3 1.4 1.4 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : chr [1:51] "iter1" "iter2" "iter3" "iter4" ...
## .. .. .. ..$ : chr [1:3] "theta1" "theta2" "theta3"
## ..$ theta.mode : num [1:3] 0.5342 -0.3321 -0.0219
## ..$ linkfunctions :List of 2
## .. ..$ names: chr "log"
## .. ..$ link : int [1:14535] 1 1 1 1 1 1 1 1 1 1 ...
## ..$ family : int [1:14535] 1 1 1 1 1 1 1 1 1 1 ...
## $ dic :List of 14
## ..$ dic : num 113016
## ..$ p.eff : num 938
## ..$ mean.deviance : num 112078
## ..$ deviance.mean : num 111141
## ..$ dic.sat : num 18808
## ..$ mean.deviance.sat: num 17870
## ..$ deviance.mean.sat: num 16924
## ..$ family.dic : num 113016
## ..$ family.dic.sat : num 18817
## ..$ family.p.eff : num 938
## ..$ family : num [1:14535] 1 1 1 1 1 1 1 1 1 1 ...
## ..$ local.dic : num [1:14535] 8.55 6.8 8.16 9.18 8.02 ...
## ..$ local.dic.sat : num [1:14535] 8.545 0.298 0.336 0.793 8.02 ...
## ..$ local.p.eff : num [1:14535] 0.00743 0.07958 0.12091 0.18844 0.01357 ...
## $ mode :List of 5
## ..$ theta : Named num [1:3] 0.5342 -0.3321 -0.0219
## .. ..- attr(*, "names")= chr [1:3] "log size for the nbinomial observations (1/overdispersion)" "Theta1 for field" "Theta2 for field"
## ..$ x : num [1:71891] 2.95 2.8 2.94 2.99 2.78 ...
## ..$ theta.tags : chr [1:3] "log size for the nbinomial observations (1/overdispersion)" "Theta1 for field" "Theta2 for field"
## ..$ mode.status : num 0
## ..$ log.posterior.mode: num -56720
## $ joint.hyper :'data.frame': 15 obs. of 5 variables:
## ..$ log size for the nbinomial observations (1/overdispersion): num [1:15] 0.534 0.562 0.506 0.522 0.545 ...
## ..$ Theta1 for field : num [1:15] -0.332 -0.336 -0.328 -0.405 -0.267 ...
## ..$ Theta2 for field : num [1:15] -0.02191 -0.02017 -0.02363 0.00385 -0.04482 ...
## ..$ Log posterior density : num [1:15] -56729 -56731 -56731 -56731 -56731 ...
## ..$ Total integration weight (log.dens included) : num [1:15] 0.1756 0.0599 0.0574 0.0583 0.0581 ...
## $ nhyper : int 3
## $ version :List of 2
## ..$ inla.call: chr "GITCOMMIT [dd38f0f7c6eb72df31ce7dd489d9352e91ffe0df - Thu Apr 25 18:31:00 2024 +0300]"
## ..$ R.INLA : Named chr "24.04.25-1"
## .. ..- attr(*, "names")= chr "version"
## $ Q : NULL
## $ graph : NULL
## $ ok : logi TRUE
## $ cpu.intern : chr [1:16] "Wall-clock time used on [/tmp/RtmpsdKiw1/fileddb91109d4800/Model.ini]" "Preparations : 0.061 seconds" "Approx inference (stage1): 6.566 seconds" "Approx inference (stage2): 0.001 seconds" ...
## $ cpu.used : Named num [1:4] 0.361 7.078 1.539 8.977
## ..- attr(*, "names")= chr [1:4] "Pre" "Running" "Post" "Total"
## $ all.hyper :List of 4
## ..$ predictor:List of 1
## .. ..$ hyper:List of 1
## .. .. ..$ theta:List of 9
## .. .. .. ..$ hyperid : num 53001
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "log precision"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name: chr "prec"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 13.8
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi TRUE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "loggamma"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1e+00 1e-05
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta:function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## ..$ family :List of 1
## .. ..$ :List of 4
## .. .. ..$ hyperid: chr "INLA.Data1"
## .. .. ..$ label : chr "nbinomial"
## .. .. ..$ hyper :List of 1
## .. .. .. ..$ theta:List of 11
## .. .. .. .. ..$ hyperid : num 63001
## .. .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. .. ..$ name : chr "size"
## .. .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. .. ..$ short.name : chr "size"
## .. .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. .. ..$ output.name : chr "size for the nbinomial observations (1/overdispersion)"
## .. .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. .. ..$ output.name.intern: chr "log size for the nbinomial observations (1/overdispersion)"
## .. .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. .. ..$ initial : num 2.3
## .. .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. .. ..$ prior : chr "pc.mgamma"
## .. .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. .. ..$ param : num 7
## .. .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. .. ..$ to.theta :function (x)
## .. .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. .. ..$ from.theta :function (x)
## .. .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ link :List of 1
## .. .. .. ..$ hyper: list()
## ..$ linear :List of 2
## .. ..$ :List of 3
## .. .. ..$ label : chr "Intercept"
## .. .. ..$ prior.mean: num 0
## .. .. ..$ prior.prec: num 0.001
## .. ..$ :List of 3
## .. .. ..$ label : chr "SpeedLimit"
## .. .. ..$ prior.mean: num 0
## .. .. ..$ prior.prec: num 0.001
## ..$ random :List of 3
## .. ..$ : NULL
## .. ..$ : NULL
## .. ..$ :List of 3
## .. .. ..$ hyperid : chr "field"
## .. .. ..$ hyper : NULL
## .. .. ..$ group.hyper:List of 1
## .. .. .. ..$ theta:List of 9
## .. .. .. .. ..$ hyperid : num 40001
## .. .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. .. ..$ name : chr "logit correlation"
## .. .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. .. ..$ short.name: chr "rho"
## .. .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. .. ..$ initial : num 1
## .. .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. .. ..$ prior : chr "normal"
## .. .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. .. ..$ param : num [1:2] 0 0.2
## .. .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. .. ..$ to.theta :function (x, REPLACE.ME.ngroup)
## .. .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. .. ..$ from.theta:function (x, REPLACE.ME.ngroup)
## .. .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## $ .args :List of 30
## ..$ formula :Class 'formula' language BRU.response ~ f(Intercept, model = BRU_Intercept_main_model, ngroup = 1, nrep = 1, values = BRU_Intercept_v| __truncated__ ...
## ..$ family : chr "nbinomial"
## ..$ data :List of 21
## .. ..$ BRU.response : num [1:14535] 0 12 24 32 0 19 22 19 30 14 ...
## .. ..$ BRU.E : num [1:14535] 1 1 1 1 1 1 1 1 1 1 ...
## .. ..$ BRU.Ntrials : num [1:14535] 1 1 1 1 1 1 1 1 1 1 ...
## .. ..$ BRU.weights : num [1:14535] 1 1 1 1 1 1 1 1 1 1 ...
## .. ..$ BRU.scale : num [1:14535] 1 1 1 1 1 1 1 1 1 1 ...
## .. ..$ BRU.offset : num [1:14535] 0 0 0 0 0 0 0 0 0 0 ...
## .. ..$ Intercept : num [1:28678] 1 NA NA NA NA NA NA NA NA NA ...
## .. ..$ Intercept.group : int [1:28678] 1 NA NA NA NA NA NA NA NA NA ...
## .. ..$ Intercept.repl : int [1:28678] 1 NA NA NA NA NA NA NA NA NA ...
## .. ..$ SpeedLimit : num [1:28678] NA 1 NA NA NA NA NA NA NA NA ...
## .. ..$ SpeedLimit.group : int [1:28678] NA 1 NA NA NA NA NA NA NA NA ...
## .. ..$ SpeedLimit.repl : int [1:28678] NA 1 NA NA NA NA NA NA NA NA ...
## .. ..$ field : int [1:28678] NA NA 1 2 3 4 5 6 7 8 ...
## .. ..$ field.group : int [1:28678] NA NA 1 1 1 1 1 1 1 1 ...
## .. ..$ field.repl : int [1:28678] NA NA 1 1 1 1 1 1 1 1 ...
## .. ..$ BRU_Intercept_main_model : chr "linear"
## .. ..$ BRU_Intercept_values : num 1
## .. ..$ BRU_SpeedLimit_main_model: chr "linear"
## .. ..$ BRU_SpeedLimit_values : num 1
## .. ..$ BRU_field_main_model :List of 21
## .. .. ..$ f :List of 3
## .. .. .. ..$ model : chr "cgeneric"
## .. .. .. ..$ n : int 7169
## .. .. .. ..$ cgeneric:List of 5
## .. .. .. .. ..$ model: chr "inla_cgeneric_rspde_stat_int_model"
## .. .. .. .. ..$ shlib: chr "/home/rierasl/R/x86_64-pc-linux-gnu-library/4.4/INLA/bin/linux/64bit/external/rSPDE/librSPDE.so"
## .. .. .. .. ..$ n : int 7169
## .. .. .. .. ..$ debug: logi FALSE
## .. .. .. .. ..$ data :List of 5
## .. .. .. .. .. ..$ ints :List of 5
## .. .. .. .. .. .. ..$ n : int 7169
## .. .. .. .. .. .. ..$ debug : int 0
## .. .. .. .. .. .. ..$ m_alpha : int 1
## .. .. .. .. .. .. ..$ graph_opt_i: int [1:16024] 0 0 0 1 1 1 1 1 1 2 ...
## .. .. .. .. .. .. ..$ graph_opt_j: int [1:16024] 0 1 985 1 1700 5207 5364 6858 7041 2 ...
## .. .. .. .. .. ..$ doubles :List of 4
## .. .. .. .. .. .. ..$ matrices_less : num [1:32048] 0.0797 0 0 0.1564 0 ...
## .. .. .. .. .. .. ..$ theta.prior.mean: num [1:2] 0 0.223
## .. .. .. .. .. .. ..$ start.theta : num [1:2] 0 0.223
## .. .. .. .. .. .. ..$ nu : num 0.5
## .. .. .. .. .. ..$ characters:List of 4
## .. .. .. .. .. .. ..$ model : chr "inla_cgeneric_rspde_stat_int_model"
## .. .. .. .. .. .. ..$ shlib : chr "/home/rierasl/R/x86_64-pc-linux-gnu-library/4.4/INLA/bin/linux/64bit/external/rSPDE/librSPDE.so"
## .. .. .. .. .. .. ..$ parameterization : chr "matern"
## .. .. .. .. .. .. ..$ prior.theta.param: chr "theta"
## .. .. .. .. .. ..$ matrices :List of 1
## .. .. .. .. .. .. ..$ theta.prior.prec: num [1:6] 2 2 0.1 0 0 0.1
## .. .. .. .. .. ..$ smatrices : list()
## .. .. .. .. ..- attr(*, "class")= chr "inla.cgeneric"
## .. .. ..$ cgeneric_type : chr "int_alpha"
## .. .. ..$ nu : num 0.5
## .. .. ..$ theta.prior.mean : num [1:2] 0 0.223
## .. .. ..$ prior.nu :List of 4
## .. .. .. ..$ loglocation: num -5e-06
## .. .. .. ..$ mean : num 1
## .. .. .. ..$ prec : num 3
## .. .. .. ..$ logscale : num 1
## .. .. ..$ theta.prior.prec : num [1:2, 1:2] 0.1 0 0 0.1
## .. .. ..$ start.nu : num 0.5
## .. .. ..$ integer.nu : logi TRUE
## .. .. ..$ start.theta : num [1:2] 0 0.223
## .. .. ..$ stationary : logi TRUE
## .. .. ..$ rspde.order : num 2
## .. .. ..$ dim : num 1
## .. .. ..$ est_nu : logi FALSE
## .. .. ..$ nu.upper.bound : num 2
## .. .. ..$ prior.nu.dist : chr "lognormal"
## .. .. ..$ debug : logi FALSE
## .. .. ..$ type.rational.approx: chr "chebfun"
## .. .. ..$ mesh :Classes 'metric_graph', 'R6' <metric_graph>
## Public:
## add_mesh_observations: function (data = NULL, group = NULL)
## add_observations: function (data = NULL, edge_number = "edge_number", distance_on_edge = "distance_on_edge",
## build_mesh: function (h = NULL, n = NULL, continuous = TRUE, continuous.outs = FALSE,
## buildC: function (alpha = 2, edge_constraint = FALSE)
## buildDirectionalConstraints: function (alpha = 1)
## C: NULL
## characteristics: list
## check_distance_consistency: function ()
## check_euclidean: function ()
## clear_observations: function ()
## clone: function (deep = FALSE)
## CoB: NULL
## compute_characteristics: function (check_euclidean = FALSE)
## compute_fem: function (petrov = FALSE)
## compute_geodist: function (full = FALSE, obs = TRUE, group = NULL, verbose = 0)
## compute_geodist_mesh: function ()
## compute_geodist_PtE: function (PtE, normalized = TRUE, include_vertices = TRUE, verbose = 0)
## compute_laplacian: function (full = FALSE, obs = TRUE, group = NULL, verbose = 0)
## compute_PtE_edges: function ()
## compute_resdist: function (full = FALSE, obs = TRUE, group = NULL, check_euclidean = FALSE,
## compute_resdist_mesh: function ()
## compute_resdist_PtE: function (PtE, normalized = TRUE, include_vertices = FALSE, check_euclidean = FALSE,
## coordinates: function (PtE = NULL, XY = NULL, normalized = TRUE)
## drop_na: function (...)
## E: 1 3 3 6 4 7 9 11 13 14 15 16 18 19 20 21 23 25 27 29 31 ...
## edge_lengths: 0.0363234139144278 0.01586106867077 0.027923568765887 0. ...
## edges: metric_graph_edges
## edgeweight_to_data: function (loc = NULL, mesh = FALSE, data_loc = FALSE, weight_col = NULL,
## fem_basis: function (PtE)
## filter: function (..., .drop_na = FALSE, .drop_all_na = TRUE)
## geo_dist: list
## get_data: function (group = NULL, tibble = TRUE, drop_na = FALSE, drop_all_na = TRUE)
## get_degrees: function (which = "degree")
## get_edge_lengths: function (unit = NULL)
## get_edge_weights: function (data.frame = FALSE, tibble = TRUE)
## get_groups: function (get_cols = FALSE)
## get_initial_graph: function ()
## get_locations: function ()
## get_mesh_locations: function (bru = FALSE, loc = NULL, normalized = TRUE)
## get_PtE: function ()
## get_vertices_incomp_dir: function ()
## initialize: function (edges = NULL, V = NULL, E = NULL, vertex_unit = NULL,
## is_tree: function ()
## Laplacian: NULL
## mesh: list
## mesh_A: function (PtE)
## mutate: function (..., .drop_na = FALSE, .drop_all_na = TRUE)
## nE: 6827
## nV: 4017
## observation_to_vertex: function (tolerance = 1e-15, mesh_warning = TRUE)
## plot: function (data = NULL, newdata = NULL, group = 1, plotly = FALSE,
## plot_connections: function ()
## plot_function: function (data = NULL, newdata = NULL, group = 1, X = NULL, plotly = FALSE,
## plot_movie: function (X, plotly = TRUE, vertex_size = 5, vertex_color = "black",
## print: function ()
## process_data: function (data = NULL, edge_number = "edge_number", distance_on_edge = "distance_on_edge",
## prune_vertices: function (check_weights = TRUE, verbose = FALSE)
## PtV: NULL
## res_dist: NULL
## select: function (..., .drop_na = FALSE, .drop_all_na = TRUE)
## set_edge_weights: function (weights = rep(1, self$nE), kirchhoff_weights = NULL)
## summarise: function (..., .include_graph_groups = FALSE, .groups = NULL,
## summary: function (messages = FALSE, compute_characteristics = TRUE, check_euclidean = TRUE,
## V: -122.41277 -122.41249 -122.40376 -122.40358 -122.40379 - ...
## vertices: metric_graph_vertices
## VtEfirst: function ()
## Private:
## A: function (group = NULL, obs_to_vert = FALSE, drop_na = FALSE,
## add_vertices: function (PtE, tolerance = 1e-10, verbose)
## addinfo: FALSE
## clear_initial_info: function ()
## compute_degrees: function ()
## compute_laplacian_PtE: function (PtE, normalized = TRUE, verbose = verbose)
## compute_lengths: function (longlat, unit, crs, proj4string, which_longlat, vertex_unit,
## connected: TRUE
## coordinates_multiple_snaps: function (XY, tolerance, verbose = verbose, crs, proj4string,
## create_update_vertices: function ()
## crs: crs
## data: metric_graph_data, list
## edge_weights: tbl_df, tbl, data.frame
## find_edge_edge_points: function (tol, verbose, crs, proj4string, longlat, fact, which_longlat)
## find_mesh_bc: function ()
## get_edge_weights_internal: function (data.frame = FALSE)
## group_col: .group
## initial_edges_added: NULL
## initial_graph: metric_graph, R6
## kirchhoff_weights: NULL
## length_unit: km
## line_to_vertex: function (tolerance = 0, longlat = FALSE, fact, verbose, crs,
## longlat: TRUE
## merge_close_vertices: function (tolerance, fact)
## merge.all.deg2: function ()
## mesh_merge_deg2: function ()
## mesh_merge_outs: function ()
## move_V_first: function ()
## plot_2d: function (line_width = 0.1, marker_size = 1, vertex_color = "black",
## plot_3d: function (line_width = 1, marker_size = 1, vertex_color = "rgb(0,0,0)",
## proj4string: NULL
## prune_warning: FALSE
## pruned: FALSE
## PtE_to_mesh: function (PtE)
## ref_edges: 1 1552 2 5 3133 4 6 395 7 526 8 6466 9 10 11 12 38 13 14 ...
## remove_circles: function (threshold, verbose, longlat, unit, crs, proj4string,
## remove.first.deg2: function (res)
## set_first_weights: function (weights = rep(1, self$nE))
## set_petrov_matrices: function ()
## split_edge: function (Ei, t, tolerance = 0)
## temp_PtE: NULL
## tolerance: list
## transform: FALSE
## vertex_unit: degrees
## which_longlat: sf
## .. .. ..$ fem_mesh :List of 4
## .. .. .. ..$ c0:Formal class 'dgTMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:7169] 0 1 2 3 4 5 6 7 8 9 ...
## .. .. .. .. .. ..@ j : int [1:7169] 0 1 2 3 4 5 6 7 8 9 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 7169 7169
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:7169] 0.0797 0.1564 0.1117 0.0493 0.0614 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ g1:Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:24879] 0 1 985 0 1 1700 5207 5364 6858 7041 ...
## .. .. .. .. .. ..@ p : int [1:7170] 0 3 10 16 20 23 27 36 44 50 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 7169 7169
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:24879] 101.1 -55.1 -46.1 -55.1 216.4 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ g2:Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:56007] 0 1 985 986 1700 4722 5207 5364 6240 6858 ...
## .. .. .. .. .. ..@ p : int [1:7170] 0 11 22 34 43 52 61 76 89 99 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 7169 7169
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:56007] 172097 -145986 -232979 119006 15770 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ g3:Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:96755] 0 1 230 984 985 986 1700 1701 2280 2455 ...
## .. .. .. .. .. ..@ p : int [1:7170] 0 17 35 57 76 91 103 126 150 166 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 7169 7169
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:96755] 3.94e+08 -3.74e+08 -2.65e+07 -9.14e+07 -1.47e+09 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. ..$ parameterization : chr "matern"
## .. .. ..$ n.spde : int 7169
## .. .. ..- attr(*, "class")= chr [1:3] "rspde_metric_graph" "inla_rspde" "inla.cgeneric"
## .. ..$ BRU_field_values : int [1:7169] 1 2 3 4 5 6 7 8 9 10 ...
## ..$ quantiles : num [1:3] 0.025 0.5 0.975
## ..$ E : num [1:14535] 1 1 1 1 1 1 1 1 1 1 ...
## ..$ offset : num [1:14535] 0 0 0 0 0 0 0 0 0 0 ...
## ..$ scale : num [1:14535] 1 1 1 1 1 1 1 1 1 1 ...
## ..$ weights : num [1:14535] 1 1 1 1 1 1 1 1 1 1 ...
## ..$ Ntrials : num [1:14535] 1 1 1 1 1 1 1 1 1 1 ...
## ..$ verbose : logi FALSE
## ..$ control.compute :List of 18
## .. ..$ openmp.strategy : chr "default"
## .. ..$ hyperpar : logi TRUE
## .. ..$ return.marginals : logi TRUE
## .. ..$ return.marginals.predictor: logi FALSE
## .. ..$ dic : logi TRUE
## .. ..$ mlik : logi TRUE
## .. ..$ cpo : logi FALSE
## .. ..$ po : logi FALSE
## .. ..$ waic : logi TRUE
## .. ..$ residuals : logi FALSE
## .. ..$ q : logi FALSE
## .. ..$ config : logi TRUE
## .. ..$ likelihood.info : logi FALSE
## .. ..$ smtp : NULL
## .. ..$ graph : logi FALSE
## .. ..$ internal.opt : NULL
## .. ..$ save.memory : NULL
## .. ..$ control.gcpo :List of 16
## .. .. ..$ enable : logi FALSE
## .. .. ..$ num.level.sets : num -1
## .. .. ..$ size.max : num 32
## .. .. ..$ strategy : chr [1:2] "posterior" "prior"
## .. .. ..$ groups : NULL
## .. .. ..$ selection : NULL
## .. .. ..$ group.selection : NULL
## .. .. ..$ friends : NULL
## .. .. ..$ weights : NULL
## .. .. ..$ verbose : logi FALSE
## .. .. ..$ epsilon : num 0.005
## .. .. ..$ prior.diagonal : num 1e-04
## .. .. ..$ correct.hyperpar: logi TRUE
## .. .. ..$ keep : NULL
## .. .. ..$ remove : NULL
## .. .. ..$ remove.fixed : logi TRUE
## .. .. ..- attr(*, "class")= chr [1:2] "ctrl_gcpo" "inla_ctrl_object"
## .. ..- attr(*, "class")= chr [1:2] "ctrl_compute" "inla_ctrl_object"
## ..$ control.predictor:List of 12
## .. ..$ hyper :List of 1
## .. .. ..$ theta:List of 9
## .. .. .. ..$ hyperid : num 53001
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "log precision"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name: chr "prec"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 13.8
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi TRUE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "loggamma"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1e+00 1e-05
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta:function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. ..$ fixed : NULL
## .. ..$ prior : NULL
## .. ..$ param : NULL
## .. ..$ initial : NULL
## .. ..$ compute : logi TRUE
## .. ..$ cdf : NULL
## .. ..$ quantiles: NULL
## .. ..$ cross : NULL
## .. ..$ A :Formal class 'dgTMatrix' [package "Matrix"] with 6 slots
## .. .. .. ..@ i : int [1:58126] 0 1 2 3 4 5 6 7 8 9 ...
## .. .. .. ..@ j : int [1:58126] 0 0 0 0 0 0 0 0 0 0 ...
## .. .. .. ..@ Dim : int [1:2] 14535 28678
## .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. ..$ : NULL
## .. .. .. .. ..$ : NULL
## .. .. .. ..@ x : num [1:58126] 1 1 1 1 1 1 1 1 1 1 ...
## .. .. .. ..@ factors : list()
## .. ..$ precision: num 3269017
## .. ..$ link : NULL
## .. ..- attr(*, "class")= chr [1:2] "ctrl_predictor" "inla_ctrl_object"
## ..$ control.family :List of 1
## .. ..$ :List of 17
## .. .. ..$ dummy : num 0
## .. .. ..$ hyper :List of 1
## .. .. .. ..$ theta:List of 11
## .. .. .. .. ..$ hyperid : num 63001
## .. .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. .. ..$ name : chr "size"
## .. .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. .. ..$ short.name : chr "size"
## .. .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. .. ..$ output.name : chr "size for the nbinomial observations (1/overdispersion)"
## .. .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. .. ..$ output.name.intern: chr "log size for the nbinomial observations (1/overdispersion)"
## .. .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. .. ..$ initial : num 2.3
## .. .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. .. ..$ prior : chr "pc.mgamma"
## .. .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. .. ..$ param : num 7
## .. .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. .. ..$ to.theta :function (x)
## .. .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. .. ..$ from.theta :function (x)
## .. .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ initial : NULL
## .. .. ..$ prior : NULL
## .. .. ..$ param : NULL
## .. .. ..$ fixed : NULL
## .. .. ..$ link : chr "default"
## .. .. ..$ sn.shape.max : num 5
## .. .. ..$ gev.scale.xi : num 0.1
## .. .. ..$ control.bgev : NULL
## .. .. ..$ cenpoisson.I : int [1:2] -1 -1
## .. .. ..$ beta.censor.value: num 0
## .. .. ..$ variant : int 0
## .. .. ..$ control.mix : NULL
## .. .. ..$ control.pom : NULL
## .. .. ..$ control.link :List of 10
## .. .. .. ..$ model : chr "default"
## .. .. .. ..$ order : NULL
## .. .. .. ..$ variant : NULL
## .. .. .. ..$ hyper : list()
## .. .. .. ..$ quantile: NULL
## .. .. .. ..$ a : num 1
## .. .. .. ..$ initial : NULL
## .. .. .. ..$ fixed : NULL
## .. .. .. ..$ prior : NULL
## .. .. .. ..$ param : NULL
## .. .. .. ..- attr(*, "class")= chr [1:2] "ctrl_link" "inla_ctrl_object"
## .. .. ..$ link.simple : chr "default"
## .. .. ..- attr(*, "class")= chr [1:2] "ctrl_family" "inla_ctrl_object"
## ..$ control.inla :List of 56
## .. ..$ strategy : chr "auto"
## .. ..$ int.strategy : chr "auto"
## .. ..$ int.design : NULL
## .. ..$ interpolator : chr "auto"
## .. ..$ fast : logi TRUE
## .. ..$ linear.correction : NULL
## .. ..$ h : num 0.005
## .. ..$ dz : num 0.75
## .. ..$ diff.logdens : num 6
## .. ..$ print.joint.hyper : logi TRUE
## .. ..$ force.diagonal : logi FALSE
## .. ..$ skip.configurations : logi TRUE
## .. ..$ mode.known : logi FALSE
## .. ..$ adjust.weights : logi TRUE
## .. ..$ tolerance : num 0.005
## .. ..$ tolerance.f : NULL
## .. ..$ tolerance.g : NULL
## .. ..$ tolerance.x : NULL
## .. ..$ tolerance.step : NULL
## .. ..$ restart : int 0
## .. ..$ optimiser : chr "default"
## .. ..$ verbose : NULL
## .. ..$ reordering : chr "auto"
## .. ..$ cpo.diff : NULL
## .. ..$ npoints : num 9
## .. ..$ cutoff : num 1e-04
## .. ..$ adapt.hessian.mode : NULL
## .. ..$ adapt.hessian.max.trials : NULL
## .. ..$ adapt.hessian.scale : NULL
## .. ..$ adaptive.max : int 25
## .. ..$ huge : logi FALSE
## .. ..$ step.len : num 0
## .. ..$ stencil : int 5
## .. ..$ lincomb.derived.correlation.matrix: logi FALSE
## .. ..$ diagonal : num 0
## .. ..$ numint.maxfeval : num 1e+05
## .. ..$ numint.relerr : num 1e-05
## .. ..$ numint.abserr : num 1e-06
## .. ..$ cmin : num -Inf
## .. ..$ b.strategy : chr "keep"
## .. ..$ step.factor : num -0.1
## .. ..$ global.node.factor : num 2
## .. ..$ global.node.degree : int 2147483647
## .. ..$ stupid.search : logi TRUE
## .. ..$ stupid.search.max.iter : int 1000
## .. ..$ stupid.search.factor : num 1.05
## .. ..$ control.vb :List of 8
## .. .. ..$ enable : chr "auto"
## .. .. ..$ strategy : chr [1:2] "mean" "variance"
## .. .. ..$ verbose : logi TRUE
## .. .. ..$ iter.max : num 25
## .. .. ..$ emergency : num 25
## .. .. ..$ f.enable.limit : num [1:4] 30 25 1024 768
## .. .. ..$ hessian.update : num 2
## .. .. ..$ hessian.strategy: chr [1:4] "default" "full" "partial" "diagonal"
## .. .. ..- attr(*, "class")= chr [1:2] "ctrl_vb" "inla_ctrl_object"
## .. ..$ num.gradient : chr "central"
## .. ..$ num.hessian : chr "central"
## .. ..$ optimise.strategy : chr "smart"
## .. ..$ use.directions : logi TRUE
## .. ..$ constr.marginal.diagonal : num 1.49e-08
## .. ..$ improved.simplified.laplace : logi FALSE
## .. ..$ parallel.linesearch : logi FALSE
## .. ..$ compute.initial.values : logi TRUE
## .. ..$ hessian.correct.skewness.only : logi TRUE
## .. ..- attr(*, "class")= chr [1:2] "ctrl_inla" "inla_ctrl_object"
## ..$ control.fixed :List of 10
## .. ..$ cdf : NULL
## .. ..$ quantiles : NULL
## .. ..$ expand.factor.strategy: chr "inla"
## .. ..$ mean : num 0
## .. ..$ mean.intercept : num 0
## .. ..$ prec : num 0.001
## .. ..$ prec.intercept : num 0
## .. ..$ compute : logi TRUE
## .. ..$ correlation.matrix : logi FALSE
## .. ..$ remove.names : NULL
## .. ..- attr(*, "class")= chr [1:2] "ctrl_fixed" "inla_ctrl_object"
## ..$ control.mode :List of 5
## .. ..$ result : NULL
## .. ..$ theta : NULL
## .. ..$ x : NULL
## .. ..$ restart: logi FALSE
## .. ..$ fixed : logi FALSE
## .. ..- attr(*, "class")= chr [1:2] "ctrl_mode" "inla_ctrl_object"
## ..$ control.expert :List of 6
## .. ..$ cpo.manual : logi FALSE
## .. ..$ cpo.idx : num -1
## .. ..$ disable.gaussian.check: logi FALSE
## .. ..$ jp : NULL
## .. ..$ dot.product.gain : logi FALSE
## .. ..$ globalconstr :List of 2
## .. .. ..$ A: NULL
## .. .. ..$ e: NULL
## .. ..- attr(*, "class")= chr [1:2] "ctrl_expert" "inla_ctrl_object"
## ..$ control.lincomb :List of 1
## .. ..$ verbose: logi FALSE
## .. ..- attr(*, "class")= chr [1:2] "ctrl_lincomb" "inla_ctrl_object"
## ..$ control.update :List of 1
## .. ..$ result: NULL
## .. ..- attr(*, "class")= chr [1:2] "ctrl_update" "inla_ctrl_object"
## ..$ control.lp.scale :List of 1
## .. ..$ hyper:List of 100
## .. .. ..$ theta1 :List of 11
## .. .. .. ..$ hyperid : num 103001
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta1"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b1"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[1] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[1] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta2 :List of 11
## .. .. .. ..$ hyperid : num 103002
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta2"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b2"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[2] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[2] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta3 :List of 11
## .. .. .. ..$ hyperid : num 103003
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta3"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b3"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[3] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[3] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta4 :List of 11
## .. .. .. ..$ hyperid : num 103004
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta4"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b4"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[4] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[4] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta5 :List of 11
## .. .. .. ..$ hyperid : num 103005
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta5"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b5"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[5] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[5] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta6 :List of 11
## .. .. .. ..$ hyperid : num 103006
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta6"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b6"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[6] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[6] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta7 :List of 11
## .. .. .. ..$ hyperid : num 103007
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta7"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b7"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[7] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[7] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta8 :List of 11
## .. .. .. ..$ hyperid : num 103008
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta8"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b8"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[8] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[8] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta9 :List of 11
## .. .. .. ..$ hyperid : num 103009
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta9"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b9"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[9] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[9] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta10 :List of 11
## .. .. .. ..$ hyperid : num 103010
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta10"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b10"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[10] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[10] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta11 :List of 11
## .. .. .. ..$ hyperid : num 103011
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta11"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b11"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[11] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[11] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta12 :List of 11
## .. .. .. ..$ hyperid : num 103012
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta12"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b12"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[12] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[12] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta13 :List of 11
## .. .. .. ..$ hyperid : num 103013
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta13"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b13"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[13] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[13] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta14 :List of 11
## .. .. .. ..$ hyperid : num 103014
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta14"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b14"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[14] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[14] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta15 :List of 11
## .. .. .. ..$ hyperid : num 103015
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta15"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b15"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[15] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[15] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta16 :List of 11
## .. .. .. ..$ hyperid : num 103016
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta16"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b16"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[16] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[16] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta17 :List of 11
## .. .. .. ..$ hyperid : num 103017
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta17"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b17"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[17] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[17] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta18 :List of 11
## .. .. .. ..$ hyperid : num 103018
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta18"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b18"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[18] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[18] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta19 :List of 11
## .. .. .. ..$ hyperid : num 103019
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta19"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b19"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[19] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[19] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta20 :List of 11
## .. .. .. ..$ hyperid : num 103020
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta20"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b20"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[20] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[20] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta21 :List of 11
## .. .. .. ..$ hyperid : num 103021
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta21"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b21"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[21] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[21] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta22 :List of 11
## .. .. .. ..$ hyperid : num 103022
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta22"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b22"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[22] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[22] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta23 :List of 11
## .. .. .. ..$ hyperid : num 103023
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta23"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b23"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[23] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[23] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta24 :List of 11
## .. .. .. ..$ hyperid : num 103024
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta24"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b24"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[24] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[24] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta25 :List of 11
## .. .. .. ..$ hyperid : num 103025
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta25"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b25"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[25] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[25] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta26 :List of 11
## .. .. .. ..$ hyperid : num 103026
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta26"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b26"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[26] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[26] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta27 :List of 11
## .. .. .. ..$ hyperid : num 103027
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta27"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b27"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[27] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[27] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta28 :List of 11
## .. .. .. ..$ hyperid : num 103028
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta28"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b28"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[28] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[28] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta29 :List of 11
## .. .. .. ..$ hyperid : num 103029
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta29"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b29"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[29] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[29] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta30 :List of 11
## .. .. .. ..$ hyperid : num 103030
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta30"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b30"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[30] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[30] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta31 :List of 11
## .. .. .. ..$ hyperid : num 103031
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta31"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b31"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[31] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[31] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta32 :List of 11
## .. .. .. ..$ hyperid : num 103032
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta32"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b32"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[32] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[32] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta33 :List of 11
## .. .. .. ..$ hyperid : num 103033
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta33"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b33"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[33] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[33] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta34 :List of 11
## .. .. .. ..$ hyperid : num 103034
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta34"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b34"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[34] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[34] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta35 :List of 11
## .. .. .. ..$ hyperid : num 103035
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta35"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b35"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[35] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[35] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta36 :List of 11
## .. .. .. ..$ hyperid : num 103036
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta36"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b36"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[36] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[36] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta37 :List of 11
## .. .. .. ..$ hyperid : num 103037
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta37"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b37"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[37] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[37] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta38 :List of 11
## .. .. .. ..$ hyperid : num 103038
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta38"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b38"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[38] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[38] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta39 :List of 11
## .. .. .. ..$ hyperid : num 103039
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta39"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b39"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[39] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[39] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta40 :List of 11
## .. .. .. ..$ hyperid : num 103040
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta40"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b40"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[40] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[40] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta41 :List of 11
## .. .. .. ..$ hyperid : num 103041
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta41"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b41"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[41] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[41] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta42 :List of 11
## .. .. .. ..$ hyperid : num 103042
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta42"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b42"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[42] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[42] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta43 :List of 11
## .. .. .. ..$ hyperid : num 103043
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta43"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b43"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[43] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[43] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta44 :List of 11
## .. .. .. ..$ hyperid : num 103044
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta44"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b44"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[44] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[44] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta45 :List of 11
## .. .. .. ..$ hyperid : num 103045
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta45"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b45"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[45] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[45] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta46 :List of 11
## .. .. .. ..$ hyperid : num 103046
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta46"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b46"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[46] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[46] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta47 :List of 11
## .. .. .. ..$ hyperid : num 103047
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta47"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b47"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[47] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[47] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta48 :List of 11
## .. .. .. ..$ hyperid : num 103048
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta48"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b48"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[48] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[48] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta49 :List of 11
## .. .. .. ..$ hyperid : num 103049
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta49"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b49"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[49] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[49] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta50 :List of 11
## .. .. .. ..$ hyperid : num 103050
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta50"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b50"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[50] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[50] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta51 :List of 11
## .. .. .. ..$ hyperid : num 103051
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta51"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b51"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[51] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[51] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta52 :List of 11
## .. .. .. ..$ hyperid : num 103052
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta52"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b52"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[52] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[52] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta53 :List of 11
## .. .. .. ..$ hyperid : num 103053
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta53"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b53"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[53] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[53] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta54 :List of 11
## .. .. .. ..$ hyperid : num 103054
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta54"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b54"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[54] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[54] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta55 :List of 11
## .. .. .. ..$ hyperid : num 103055
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta55"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b55"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[55] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[55] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta56 :List of 11
## .. .. .. ..$ hyperid : num 103056
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta56"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b56"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[56] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[56] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta57 :List of 11
## .. .. .. ..$ hyperid : num 103057
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta57"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b57"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[57] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[57] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta58 :List of 11
## .. .. .. ..$ hyperid : num 103058
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta58"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b58"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[58] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[58] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta59 :List of 11
## .. .. .. ..$ hyperid : num 103059
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta59"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b59"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[59] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[59] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta60 :List of 11
## .. .. .. ..$ hyperid : num 103060
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta60"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b60"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[60] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[60] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta61 :List of 11
## .. .. .. ..$ hyperid : num 103061
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta61"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b61"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[61] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[61] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta62 :List of 11
## .. .. .. ..$ hyperid : num 103062
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta62"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b62"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[62] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[62] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta63 :List of 11
## .. .. .. ..$ hyperid : num 103063
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta63"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b63"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[63] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[63] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta64 :List of 11
## .. .. .. ..$ hyperid : num 103064
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta64"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b64"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[64] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[64] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta65 :List of 11
## .. .. .. ..$ hyperid : num 103065
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta65"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b65"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[65] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[65] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta66 :List of 11
## .. .. .. ..$ hyperid : num 103066
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta66"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b66"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[66] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[66] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta67 :List of 11
## .. .. .. ..$ hyperid : num 103067
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta67"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b67"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[67] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[67] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta68 :List of 11
## .. .. .. ..$ hyperid : num 103068
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta68"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b68"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[68] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[68] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta69 :List of 11
## .. .. .. ..$ hyperid : num 103069
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta69"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b69"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[69] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[69] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta70 :List of 11
## .. .. .. ..$ hyperid : num 103070
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta70"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b70"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[70] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[70] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta71 :List of 11
## .. .. .. ..$ hyperid : num 103071
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta71"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b71"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[71] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[71] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta72 :List of 11
## .. .. .. ..$ hyperid : num 103072
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta72"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b72"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[72] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[72] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta73 :List of 11
## .. .. .. ..$ hyperid : num 103073
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta73"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b73"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[73] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[73] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta74 :List of 11
## .. .. .. ..$ hyperid : num 103074
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta74"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b74"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[74] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[74] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta75 :List of 11
## .. .. .. ..$ hyperid : num 103075
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta75"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b75"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[75] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[75] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta76 :List of 11
## .. .. .. ..$ hyperid : num 103076
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta76"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b76"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[76] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[76] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta77 :List of 11
## .. .. .. ..$ hyperid : num 103077
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta77"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b77"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[77] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[77] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta78 :List of 11
## .. .. .. ..$ hyperid : num 103078
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta78"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b78"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[78] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[78] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta79 :List of 11
## .. .. .. ..$ hyperid : num 103079
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta79"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b79"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[79] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[79] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta80 :List of 11
## .. .. .. ..$ hyperid : num 103080
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta80"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b80"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[80] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[80] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta81 :List of 11
## .. .. .. ..$ hyperid : num 103081
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta81"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b81"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[81] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[81] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta82 :List of 11
## .. .. .. ..$ hyperid : num 103082
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta82"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b82"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[82] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[82] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta83 :List of 11
## .. .. .. ..$ hyperid : num 103083
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta83"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b83"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[83] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[83] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta84 :List of 11
## .. .. .. ..$ hyperid : num 103084
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta84"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b84"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[84] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[84] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta85 :List of 11
## .. .. .. ..$ hyperid : num 103085
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta85"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b85"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[85] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[85] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta86 :List of 11
## .. .. .. ..$ hyperid : num 103086
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta86"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b86"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[86] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[86] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta87 :List of 11
## .. .. .. ..$ hyperid : num 103087
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta87"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b87"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[87] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[87] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta88 :List of 11
## .. .. .. ..$ hyperid : num 103088
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta88"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b88"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[88] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[88] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta89 :List of 11
## .. .. .. ..$ hyperid : num 103089
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta89"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b89"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[89] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[89] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta90 :List of 11
## .. .. .. ..$ hyperid : num 103090
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta90"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b90"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[90] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[90] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta91 :List of 11
## .. .. .. ..$ hyperid : num 103091
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta91"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b91"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[91] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[91] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta92 :List of 11
## .. .. .. ..$ hyperid : num 103092
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta92"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b92"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[92] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[92] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta93 :List of 11
## .. .. .. ..$ hyperid : num 103093
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta93"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b93"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[93] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[93] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta94 :List of 11
## .. .. .. ..$ hyperid : num 103094
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta94"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b94"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[94] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[94] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta95 :List of 11
## .. .. .. ..$ hyperid : num 103095
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta95"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b95"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[95] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[95] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta96 :List of 11
## .. .. .. ..$ hyperid : num 103096
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta96"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b96"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[96] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[96] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta97 :List of 11
## .. .. .. ..$ hyperid : num 103097
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta97"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b97"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[97] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[97] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta98 :List of 11
## .. .. .. ..$ hyperid : num 103098
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta98"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b98"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[98] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[98] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta99 :List of 11
## .. .. .. ..$ hyperid : num 103099
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta99"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b99"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[99] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[99] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. [list output truncated]
## .. ..- attr(*, "class")= chr [1:2] "ctrl_lp_scale" "inla_ctrl_object"
## ..$ control.pardiso :List of 4
## .. ..$ verbose : logi FALSE
## .. ..$ debug : logi FALSE
## .. ..$ parallel.reordering: logi TRUE
## .. ..$ nrhs : num -1
## .. ..- attr(*, "class")= chr [1:2] "ctrl_pardiso" "inla_ctrl_object"
## ..$ only.hyperparam : logi FALSE
## ..$ inla.call : chr "/home/rierasl/R/x86_64-pc-linux-gnu-library/4.4/INLA/bin/linux/64bit/inla.mkl.run"
## ..$ num.threads : chr "24:1"
## ..$ keep : logi FALSE
## ..$ silent : logi TRUE
## ..$ inla.mode : chr "compact"
## ..$ safe : logi TRUE
## ..$ debug : logi FALSE
## ..$ .parent.frame :<environment: R_GlobalEnv>
## $ call : chr [1:14] "inla.core(formula = formula, family = family, contrasts = contrasts, " " data = data, quantiles = quantiles, E = E, offset = offset, " " scale = scale, weights = weights, Ntrials = Ntrials, strata = strata, " " lp.scale = lp.scale, link.covariates = link.covariates, verbose = verbose, " ...
## $ model.matrix :Formal class 'dsparseModelMatrix' [package "MatrixModels"] with 8 slots
## .. ..@ i : int(0)
## .. ..@ p : int 0
## .. ..@ Dim : int [1:2] 28678 0
## .. ..@ Dimnames :List of 2
## .. .. ..$ : chr [1:28678] "1" "2" "3" "4" ...
## .. .. ..$ : NULL
## .. ..@ x : num(0)
## .. ..@ factors : list()
## .. ..@ assign : int(0)
## .. ..@ contrasts: Named list()
## $ bru_iinla :List of 5
## ..$ log :Class 'bru_log' hidden list of 2
## .. ..$ log : chr [1:7] "2024-05-05 14:35:02.309232: iinla: Evaluate component inputs" "2024-05-05 14:35:02.368871: iinla: Evaluate component linearisations" "2024-05-05 14:35:05.354818: iinla: Evaluate component simplifications" "2024-05-05 14:35:08.255534: iinla: Evaluate predictor linearisation" ...
## .. ..$ bookmarks: Named int 0
## .. .. ..- attr(*, "names")= chr "iinla"
## ..$ states :List of 1
## .. ..$ :List of 3
## .. .. ..$ Intercept : num 0
## .. .. ..$ SpeedLimit: num 0
## .. .. ..$ field : num [1:28676] 0 0 0 0 0 0 0 0 0 0 ...
## ..$ inla_stack:List of 3
## .. ..$ A :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. ..@ i : int [1:58126] 0 1 2 3 4 5 6 7 8 9 ...
## .. .. .. ..@ p : int [1:28679] 0 14535 29070 29074 29081 29081 29081 29081 29082 29083 ...
## .. .. .. ..@ Dim : int [1:2] 14535 28678
## .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. ..$ : NULL
## .. .. .. .. ..$ : NULL
## .. .. .. ..@ x : num [1:58126] 1 1 1 1 1 1 1 1 1 1 ...
## .. .. .. ..@ factors : list()
## .. ..$ data :List of 5
## .. .. ..$ data :'data.frame': 14535 obs. of 6 variables:
## .. .. .. ..$ BRU.response: num [1:14535] 0 12 24 32 0 19 22 19 30 14 ...
## .. .. .. ..$ BRU.E : num [1:14535] 1 1 1 1 1 1 1 1 1 1 ...
## .. .. .. ..$ BRU.Ntrials : num [1:14535] 1 1 1 1 1 1 1 1 1 1 ...
## .. .. .. ..$ BRU.weights : num [1:14535] 1 1 1 1 1 1 1 1 1 1 ...
## .. .. .. ..$ BRU.scale : num [1:14535] 1 1 1 1 1 1 1 1 1 1 ...
## .. .. .. ..$ BRU.offset : num [1:14535] 0 0 0 0 0 0 0 0 0 0 ...
## .. .. ..$ nrow : int 14535
## .. .. ..$ ncol : Named int [1:6] 1 1 1 1 1 1
## .. .. .. ..- attr(*, "names")= chr [1:6] "BRU.response" "BRU.E" "BRU.Ntrials" "BRU.weights" ...
## .. .. ..$ names:List of 6
## .. .. .. ..$ BRU.response: chr "BRU.response"
## .. .. .. ..$ BRU.E : chr "BRU.E"
## .. .. .. ..$ BRU.Ntrials : chr "BRU.Ntrials"
## .. .. .. ..$ BRU.weights : chr "BRU.weights"
## .. .. .. ..$ BRU.scale : chr "BRU.scale"
## .. .. .. ..$ BRU.offset : chr "BRU.offset"
## .. .. ..$ index:List of 1
## .. .. .. ..$ : num [1:14535] 1 2 3 4 5 6 7 8 9 10 ...
## .. .. ..- attr(*, "class")= chr "inla.data.stack.info"
## .. ..$ effects:List of 5
## .. .. ..$ data :'data.frame': 28678 obs. of 9 variables:
## .. .. .. ..$ Intercept : num [1:28678] 1 NA NA NA NA NA NA NA NA NA ...
## .. .. .. ..$ Intercept.group : int [1:28678] 1 NA NA NA NA NA NA NA NA NA ...
## .. .. .. ..$ Intercept.repl : int [1:28678] 1 NA NA NA NA NA NA NA NA NA ...
## .. .. .. ..$ SpeedLimit : num [1:28678] NA 1 NA NA NA NA NA NA NA NA ...
## .. .. .. ..$ SpeedLimit.group: int [1:28678] NA 1 NA NA NA NA NA NA NA NA ...
## .. .. .. ..$ SpeedLimit.repl : int [1:28678] NA 1 NA NA NA NA NA NA NA NA ...
## .. .. .. ..$ field : int [1:28678] NA NA 1 2 3 4 5 6 7 8 ...
## .. .. .. ..$ field.group : int [1:28678] NA NA 1 1 1 1 1 1 1 1 ...
## .. .. .. ..$ field.repl : int [1:28678] NA NA 1 1 1 1 1 1 1 1 ...
## .. .. ..$ nrow : int 28678
## .. .. ..$ ncol : Named int [1:9] 1 1 1 1 1 1 1 1 1
## .. .. .. ..- attr(*, "names")= chr [1:9] "Intercept" "Intercept.group" "Intercept.repl" "SpeedLimit" ...
## .. .. ..$ names:List of 9
## .. .. .. ..$ Intercept : chr "Intercept"
## .. .. .. ..$ Intercept.group : chr "Intercept.group"
## .. .. .. ..$ Intercept.repl : chr "Intercept.repl"
## .. .. .. ..$ SpeedLimit : chr "SpeedLimit"
## .. .. .. ..$ SpeedLimit.group: chr "SpeedLimit.group"
## .. .. .. ..$ SpeedLimit.repl : chr "SpeedLimit.repl"
## .. .. .. ..$ field : chr "field"
## .. .. .. ..$ field.group : chr "field.group"
## .. .. .. ..$ field.repl : chr "field.repl"
## .. .. ..$ index:List of 3
## .. .. .. ..$ : int 1
## .. .. .. ..$ : int 2
## .. .. .. ..$ : int [1:28676] 3 4 5 6 7 8 9 10 11 12 ...
## .. .. ..- attr(*, "class")= chr "inla.data.stack.info"
## .. ..- attr(*, "class")= chr "inla.data.stack"
## ..$ track :'data.frame': 28682 obs. of 6 variables:
## .. ..$ effect : chr [1:28682] "Intercept" "SpeedLimit" "field" "field" ...
## .. ..$ index : num [1:28682] 1 1 1 2 3 4 5 6 7 8 ...
## .. ..$ iteration : num [1:28682] 1 1 1 1 1 1 1 1 1 1 ...
## .. ..$ mode : num [1:28682] 2.9059 0.1168 0.08 0.0208 0.0145 ...
## .. ..$ sd : num [1:28682] 0.0235 0.0115 0.1918 0.1692 0.2168 ...
## .. ..$ new_linearisation: num [1:28682] 0 0 0 0 0 0 0 0 0 0 ...
## ..$ timings :'data.frame': 2 obs. of 3 variables:
## .. ..$ Task : chr [1:2] "Preprocess" "Run inla()"
## .. ..$ Iteration: num [1:2] 1 1
## .. ..$ Time : 'difftime' num [1:2] 19.7606017589569 9.0279438495636
## .. .. ..- attr(*, "units")= chr "secs"
## $ bru_timings :'data.frame': 3 obs. of 3 variables:
## ..$ Task : chr [1:3] "Preprocess" "Preprocess" "Run inla()"
## ..$ Iteration: num [1:3] 0 1 1
## ..$ Time : 'difftime' num [1:3] 0.0714759826660156 19.7606017589569 9.0279438495636
## .. ..- attr(*, "units")= chr "secs"
## $ bru_info :List of 6
## ..$ method : chr "bru"
## ..$ model :List of 2
## .. ..$ effects:List of 3
## .. .. ..$ Intercept :List of 12
## .. .. .. ..$ label : chr "Intercept"
## .. .. .. ..$ inla.formula:Class 'formula' language ~. + f(Intercept, model = BRU_Intercept_main_model, ngroup = 1, nrep = 1, values = BRU_Intercept_values)
## .. .. .. .. .. ..- attr(*, ".Environment")=<environment: R_GlobalEnv>
## .. .. .. ..$ main :List of 8
## .. .. .. .. ..$ input :List of 4
## .. .. .. .. .. ..$ input : num 1
## .. .. .. .. .. ..$ label : chr "Intercept"
## .. .. .. .. .. ..$ layer : NULL
## .. .. .. .. .. ..$ selector: NULL
## .. .. .. .. .. ..- attr(*, "class")= chr [1:2] "bru_input" "list"
## .. .. .. .. ..$ mapper : list()
## .. .. .. .. .. ..- attr(*, "class")= chr [1:3] "bru_mapper_linear" "bru_mapper" "list"
## .. .. .. .. ..$ model : chr "linear"
## .. .. .. .. ..$ type : chr "linear"
## .. .. .. .. ..$ n : int 1
## .. .. .. .. ..$ values : num 1
## .. .. .. .. ..$ season.length : NULL
## .. .. .. .. ..$ factor_mapping: NULL
## .. .. .. .. ..- attr(*, "class")= chr [1:2] "bru_subcomponent" "list"
## .. .. .. ..$ group :List of 8
## .. .. .. .. ..$ input :List of 4
## .. .. .. .. .. ..$ input : int 1
## .. .. .. .. .. ..$ label : chr "Intercept.group"
## .. .. .. .. .. ..$ layer : NULL
## .. .. .. .. .. ..$ selector: NULL
## .. .. .. .. .. ..- attr(*, "class")= chr [1:2] "bru_input" "list"
## .. .. .. .. ..$ mapper :List of 1
## .. .. .. .. .. ..$ n: num 1
## .. .. .. .. .. ..- attr(*, "class")= chr [1:3] "bru_mapper_index" "bru_mapper" "list"
## .. .. .. .. ..$ model : chr "exchangeable"
## .. .. .. .. ..$ type : chr "exchangeable"
## .. .. .. .. ..$ n : num 1
## .. .. .. .. ..$ values : int 1
## .. .. .. .. ..$ season.length : NULL
## .. .. .. .. ..$ factor_mapping: NULL
## .. .. .. .. ..- attr(*, "class")= chr [1:2] "bru_subcomponent" "list"
## .. .. .. ..$ replicate :List of 8
## .. .. .. .. ..$ input :List of 4
## .. .. .. .. .. ..$ input : int 1
## .. .. .. .. .. ..$ label : chr "Intercept.repl"
## .. .. .. .. .. ..$ layer : NULL
## .. .. .. .. .. ..$ selector: NULL
## .. .. .. .. .. ..- attr(*, "class")= chr [1:2] "bru_input" "list"
## .. .. .. .. ..$ mapper :List of 1
## .. .. .. .. .. ..$ n: num 1
## .. .. .. .. .. ..- attr(*, "class")= chr [1:3] "bru_mapper_index" "bru_mapper" "list"
## .. .. .. .. ..$ model : chr "iid"
## .. .. .. .. ..$ type : chr "iid"
## .. .. .. .. ..$ n : num 1
## .. .. .. .. ..$ values : int 1
## .. .. .. .. ..$ season.length : NULL
## .. .. .. .. ..$ factor_mapping: NULL
## .. .. .. .. ..- attr(*, "class")= chr [1:2] "bru_subcomponent" "list"
## .. .. .. ..$ weights : NULL
## .. .. .. ..$ copy : NULL
## .. .. .. ..$ marginal : NULL
## .. .. .. ..$ env :<environment: R_GlobalEnv>
## .. .. .. ..$ env_extra :<environment: 0x5b13c2909130>
## .. .. .. ..$ fcall : language "f"(Intercept, model = BRU_Intercept_main_model, ngroup = 1, nrep = 1, values = BRU_Intercept_values)
## .. .. .. ..$ mapper :List of 6
## .. .. .. .. ..$ mappers :List of 2
## .. .. .. .. .. ..$ mapper:List of 9
## .. .. .. .. .. .. ..$ mappers :List of 3
## .. .. .. .. .. .. .. ..$ main : list()
## .. .. .. .. .. .. .. .. ..- attr(*, "class")= chr [1:3] "bru_mapper_linear" "bru_mapper" "list"
## .. .. .. .. .. .. .. ..$ group :List of 1
## .. .. .. .. .. .. .. .. ..$ n: num 1
## .. .. .. .. .. .. .. .. ..- attr(*, "class")= chr [1:3] "bru_mapper_index" "bru_mapper" "list"
## .. .. .. .. .. .. .. ..$ replicate:List of 1
## .. .. .. .. .. .. .. .. ..$ n: num 1
## .. .. .. .. .. .. .. .. ..- attr(*, "class")= chr [1:3] "bru_mapper_index" "bru_mapper" "list"
## .. .. .. .. .. .. ..$ n_multi :List of 3
## .. .. .. .. .. .. .. ..$ main : int 1
## .. .. .. .. .. .. .. ..$ group : num 1
## .. .. .. .. .. .. .. ..$ replicate: num 1
## .. .. .. .. .. .. ..$ n_inla_multi :List of 3
## .. .. .. .. .. .. .. ..$ main : int 1
## .. .. .. .. .. .. .. ..$ group : num 1
## .. .. .. .. .. .. .. ..$ replicate: num 1
## .. .. .. .. .. .. ..$ values_multi :List of 3
## .. .. .. .. .. .. .. ..$ main : num 1
## .. .. .. .. .. .. .. ..$ group : int 1
## .. .. .. .. .. .. .. ..$ replicate: int 1
## .. .. .. .. .. .. ..$ values_inla_multi:List of 3
## .. .. .. .. .. .. .. ..$ main : num 1
## .. .. .. .. .. .. .. ..$ group : int 1
## .. .. .. .. .. .. .. ..$ replicate: int 1
## .. .. .. .. .. .. ..$ is_linear_multi :List of 3
## .. .. .. .. .. .. .. ..$ main : logi TRUE
## .. .. .. .. .. .. .. ..$ group : logi TRUE
## .. .. .. .. .. .. .. ..$ replicate: logi TRUE
## .. .. .. .. .. .. ..$ n : num 1
## .. .. .. .. .. .. ..$ n_inla : num 1
## .. .. .. .. .. .. ..$ is_linear : logi TRUE
## .. .. .. .. .. .. ..- attr(*, "class")= chr [1:3] "bru_mapper_multi" "bru_mapper" "list"
## .. .. .. .. .. ..$ scale : list()
## .. .. .. .. .. .. ..- attr(*, "class")= chr [1:3] "bru_mapper_scale" "bru_mapper" "list"
## .. .. .. .. ..$ : Named logi [1:2] TRUE TRUE
## .. .. .. .. .. ..- attr(*, "names")= chr [1:2] "mapper" "scale"
## .. .. .. .. ..$ is_linear: logi TRUE
## .. .. .. .. ..$ n_multi : Named int [1:2] 1 NA
## .. .. .. .. .. ..- attr(*, "names")= chr [1:2] "mapper" "scale"
## .. .. .. .. ..$ n : num 1
## .. .. .. .. ..$ names : chr [1:2] "mapper" "scale"
## .. .. .. .. ..- attr(*, "class")= chr [1:3] "bru_mapper_pipe" "bru_mapper" "list"
## .. .. .. ..- attr(*, "class")= chr [1:2] "component" "list"
## .. .. ..$ SpeedLimit:List of 12
## .. .. .. ..$ label : chr "SpeedLimit"
## .. .. .. ..$ inla.formula:Class 'formula' language ~. + f(SpeedLimit, model = BRU_SpeedLimit_main_model, ngroup = 1, nrep = 1, values = BRU_SpeedLimit_values)
## .. .. .. .. .. ..- attr(*, ".Environment")=<environment: R_GlobalEnv>
## .. .. .. ..$ main :List of 8
## .. .. .. .. ..$ input :List of 4
## .. .. .. .. .. ..$ input : symbol SpeedLimit
## .. .. .. .. .. ..$ label : chr "SpeedLimit"
## .. .. .. .. .. ..$ layer : NULL
## .. .. .. .. .. ..$ selector: NULL
## .. .. .. .. .. ..- attr(*, "class")= chr [1:2] "bru_input" "list"
## .. .. .. .. ..$ mapper : list()
## .. .. .. .. .. ..- attr(*, "class")= chr [1:3] "bru_mapper_linear" "bru_mapper" "list"
## .. .. .. .. ..$ model : chr "linear"
## .. .. .. .. ..$ type : chr "linear"
## .. .. .. .. ..$ n : int 1
## .. .. .. .. ..$ values : num 1
## .. .. .. .. ..$ season.length : NULL
## .. .. .. .. ..$ factor_mapping: NULL
## .. .. .. .. ..- attr(*, "class")= chr [1:2] "bru_subcomponent" "list"
## .. .. .. ..$ group :List of 8
## .. .. .. .. ..$ input :List of 4
## .. .. .. .. .. ..$ input : int 1
## .. .. .. .. .. ..$ label : chr "SpeedLimit.group"
## .. .. .. .. .. ..$ layer : NULL
## .. .. .. .. .. ..$ selector: NULL
## .. .. .. .. .. ..- attr(*, "class")= chr [1:2] "bru_input" "list"
## .. .. .. .. ..$ mapper :List of 1
## .. .. .. .. .. ..$ n: num 1
## .. .. .. .. .. ..- attr(*, "class")= chr [1:3] "bru_mapper_index" "bru_mapper" "list"
## .. .. .. .. ..$ model : chr "exchangeable"
## .. .. .. .. ..$ type : chr "exchangeable"
## .. .. .. .. ..$ n : num 1
## .. .. .. .. ..$ values : int 1
## .. .. .. .. ..$ season.length : NULL
## .. .. .. .. ..$ factor_mapping: NULL
## .. .. .. .. ..- attr(*, "class")= chr [1:2] "bru_subcomponent" "list"
## .. .. .. ..$ replicate :List of 8
## .. .. .. .. ..$ input :List of 4
## .. .. .. .. .. ..$ input : int 1
## .. .. .. .. .. ..$ label : chr "SpeedLimit.repl"
## .. .. .. .. .. ..$ layer : NULL
## .. .. .. .. .. ..$ selector: NULL
## .. .. .. .. .. ..- attr(*, "class")= chr [1:2] "bru_input" "list"
## .. .. .. .. ..$ mapper :List of 1
## .. .. .. .. .. ..$ n: num 1
## .. .. .. .. .. ..- attr(*, "class")= chr [1:3] "bru_mapper_index" "bru_mapper" "list"
## .. .. .. .. ..$ model : chr "iid"
## .. .. .. .. ..$ type : chr "iid"
## .. .. .. .. ..$ n : num 1
## .. .. .. .. ..$ values : int 1
## .. .. .. .. ..$ season.length : NULL
## .. .. .. .. ..$ factor_mapping: NULL
## .. .. .. .. ..- attr(*, "class")= chr [1:2] "bru_subcomponent" "list"
## .. .. .. ..$ weights : NULL
## .. .. .. ..$ copy : NULL
## .. .. .. ..$ marginal : NULL
## .. .. .. ..$ env :<environment: R_GlobalEnv>
## .. .. .. ..$ env_extra :<environment: 0x5b13c28c17e8>
## .. .. .. ..$ fcall : language "f"(SpeedLimit, model = BRU_SpeedLimit_main_model, ngroup = 1, nrep = 1, values = BRU_SpeedLimit_values)
## .. .. .. ..$ mapper :List of 6
## .. .. .. .. ..$ mappers :List of 2
## .. .. .. .. .. ..$ mapper:List of 9
## .. .. .. .. .. .. ..$ mappers :List of 3
## .. .. .. .. .. .. .. ..$ main : list()
## .. .. .. .. .. .. .. .. ..- attr(*, "class")= chr [1:3] "bru_mapper_linear" "bru_mapper" "list"
## .. .. .. .. .. .. .. ..$ group :List of 1
## .. .. .. .. .. .. .. .. ..$ n: num 1
## .. .. .. .. .. .. .. .. ..- attr(*, "class")= chr [1:3] "bru_mapper_index" "bru_mapper" "list"
## .. .. .. .. .. .. .. ..$ replicate:List of 1
## .. .. .. .. .. .. .. .. ..$ n: num 1
## .. .. .. .. .. .. .. .. ..- attr(*, "class")= chr [1:3] "bru_mapper_index" "bru_mapper" "list"
## .. .. .. .. .. .. ..$ n_multi :List of 3
## .. .. .. .. .. .. .. ..$ main : int 1
## .. .. .. .. .. .. .. ..$ group : num 1
## .. .. .. .. .. .. .. ..$ replicate: num 1
## .. .. .. .. .. .. ..$ n_inla_multi :List of 3
## .. .. .. .. .. .. .. ..$ main : int 1
## .. .. .. .. .. .. .. ..$ group : num 1
## .. .. .. .. .. .. .. ..$ replicate: num 1
## .. .. .. .. .. .. ..$ values_multi :List of 3
## .. .. .. .. .. .. .. ..$ main : num 1
## .. .. .. .. .. .. .. ..$ group : int 1
## .. .. .. .. .. .. .. ..$ replicate: int 1
## .. .. .. .. .. .. ..$ values_inla_multi:List of 3
## .. .. .. .. .. .. .. ..$ main : num 1
## .. .. .. .. .. .. .. ..$ group : int 1
## .. .. .. .. .. .. .. ..$ replicate: int 1
## .. .. .. .. .. .. ..$ is_linear_multi :List of 3
## .. .. .. .. .. .. .. ..$ main : logi TRUE
## .. .. .. .. .. .. .. ..$ group : logi TRUE
## .. .. .. .. .. .. .. ..$ replicate: logi TRUE
## .. .. .. .. .. .. ..$ n : num 1
## .. .. .. .. .. .. ..$ n_inla : num 1
## .. .. .. .. .. .. ..$ is_linear : logi TRUE
## .. .. .. .. .. .. ..- attr(*, "class")= chr [1:3] "bru_mapper_multi" "bru_mapper" "list"
## .. .. .. .. .. ..$ scale : list()
## .. .. .. .. .. .. ..- attr(*, "class")= chr [1:3] "bru_mapper_scale" "bru_mapper" "list"
## .. .. .. .. ..$ : Named logi [1:2] TRUE TRUE
## .. .. .. .. .. ..- attr(*, "names")= chr [1:2] "mapper" "scale"
## .. .. .. .. ..$ is_linear: logi TRUE
## .. .. .. .. ..$ n_multi : Named int [1:2] 1 NA
## .. .. .. .. .. ..- attr(*, "names")= chr [1:2] "mapper" "scale"
## .. .. .. .. ..$ n : num 1
## .. .. .. .. ..$ names : chr [1:2] "mapper" "scale"
## .. .. .. .. ..- attr(*, "class")= chr [1:3] "bru_mapper_pipe" "bru_mapper" "list"
## .. .. .. ..- attr(*, "class")= chr [1:2] "component" "list"
## .. .. ..$ field :List of 12
## .. .. .. ..$ label : chr "field"
## .. .. .. ..$ inla.formula:Class 'formula' language ~. + f(field, model = BRU_field_main_model, replicate = field.repl, ngroup = 1, nrep = 4L, values = BRU_field_values)
## .. .. .. .. .. ..- attr(*, ".Environment")=<environment: R_GlobalEnv>
## .. .. .. ..$ main :List of 8
## .. .. .. .. ..$ input :List of 4
## .. .. .. .. .. ..$ input : symbol loc
## .. .. .. .. .. ..$ label : chr "field"
## .. .. .. .. .. ..$ layer : NULL
## .. .. .. .. .. ..$ selector: NULL
## .. .. .. .. .. ..- attr(*, "class")= chr [1:2] "bru_input" "list"
## .. .. .. .. ..$ mapper :List of 1
## .. .. .. .. .. ..$ model:List of 21
## .. .. .. .. .. .. ..$ f :List of 3
## .. .. .. .. .. .. .. ..$ model : chr "cgeneric"
## .. .. .. .. .. .. .. ..$ n : int 7169
## .. .. .. .. .. .. .. ..$ cgeneric:List of 5
## .. .. .. .. .. .. .. .. ..$ model: chr "inla_cgeneric_rspde_stat_int_model"
## .. .. .. .. .. .. .. .. ..$ shlib: chr "/home/rierasl/R/x86_64-pc-linux-gnu-library/4.4/INLA/bin/linux/64bit/external/rSPDE/librSPDE.so"
## .. .. .. .. .. .. .. .. ..$ n : int 7169
## .. .. .. .. .. .. .. .. ..$ debug: logi FALSE
## .. .. .. .. .. .. .. .. ..$ data :List of 5
## .. .. .. .. .. .. .. .. .. ..$ ints :List of 5
## .. .. .. .. .. .. .. .. .. .. ..$ n : int 7169
## .. .. .. .. .. .. .. .. .. .. ..$ debug : int 0
## .. .. .. .. .. .. .. .. .. .. ..$ m_alpha : int 1
## .. .. .. .. .. .. .. .. .. .. ..$ graph_opt_i: int [1:16024] 0 0 0 1 1 1 1 1 1 2 ...
## .. .. .. .. .. .. .. .. .. .. ..$ graph_opt_j: int [1:16024] 0 1 985 1 1700 5207 5364 6858 7041 2 ...
## .. .. .. .. .. .. .. .. .. ..$ doubles :List of 4
## .. .. .. .. .. .. .. .. .. .. ..$ matrices_less : num [1:32048] 0.0797 0 0 0.1564 0 ...
## .. .. .. .. .. .. .. .. .. .. ..$ theta.prior.mean: num [1:2] 0 0.223
## .. .. .. .. .. .. .. .. .. .. ..$ start.theta : num [1:2] 0 0.223
## .. .. .. .. .. .. .. .. .. .. ..$ nu : num 0.5
## .. .. .. .. .. .. .. .. .. ..$ characters:List of 4
## .. .. .. .. .. .. .. .. .. .. ..$ model : chr "inla_cgeneric_rspde_stat_int_model"
## .. .. .. .. .. .. .. .. .. .. ..$ shlib : chr "/home/rierasl/R/x86_64-pc-linux-gnu-library/4.4/INLA/bin/linux/64bit/external/rSPDE/librSPDE.so"
## .. .. .. .. .. .. .. .. .. .. ..$ parameterization : chr "matern"
## .. .. .. .. .. .. .. .. .. .. ..$ prior.theta.param: chr "theta"
## .. .. .. .. .. .. .. .. .. ..$ matrices :List of 1
## .. .. .. .. .. .. .. .. .. .. ..$ theta.prior.prec: num [1:6] 2 2 0.1 0 0 0.1
## .. .. .. .. .. .. .. .. .. ..$ smatrices : list()
## .. .. .. .. .. .. .. .. ..- attr(*, "class")= chr "inla.cgeneric"
## .. .. .. .. .. .. ..$ cgeneric_type : chr "int_alpha"
## .. .. .. .. .. .. ..$ nu : num 0.5
## .. .. .. .. .. .. ..$ theta.prior.mean : num [1:2] 0 0.223
## .. .. .. .. .. .. ..$ prior.nu :List of 4
## .. .. .. .. .. .. .. ..$ loglocation: num -5e-06
## .. .. .. .. .. .. .. ..$ mean : num 1
## .. .. .. .. .. .. .. ..$ prec : num 3
## .. .. .. .. .. .. .. ..$ logscale : num 1
## .. .. .. .. .. .. ..$ theta.prior.prec : num [1:2, 1:2] 0.1 0 0 0.1
## .. .. .. .. .. .. ..$ start.nu : num 0.5
## .. .. .. .. .. .. ..$ integer.nu : logi TRUE
## .. .. .. .. .. .. ..$ start.theta : num [1:2] 0 0.223
## .. .. .. .. .. .. ..$ stationary : logi TRUE
## .. .. .. .. .. .. ..$ rspde.order : num 2
## .. .. .. .. .. .. ..$ dim : num 1
## .. .. .. .. .. .. ..$ est_nu : logi FALSE
## .. .. .. .. .. .. ..$ nu.upper.bound : num 2
## .. .. .. .. .. .. ..$ prior.nu.dist : chr "lognormal"
## .. .. .. .. .. .. ..$ debug : logi FALSE
## .. .. .. .. .. .. ..$ type.rational.approx: chr "chebfun"
## .. .. .. .. .. .. ..$ mesh :Classes 'metric_graph', 'R6' <metric_graph>
## Public:
## add_mesh_observations: function (data = NULL, group = NULL)
## add_observations: function (data = NULL, edge_number = "edge_number", distance_on_edge = "distance_on_edge",
## build_mesh: function (h = NULL, n = NULL, continuous = TRUE, continuous.outs = FALSE,
## buildC: function (alpha = 2, edge_constraint = FALSE)
## buildDirectionalConstraints: function (alpha = 1)
## C: NULL
## characteristics: list
## check_distance_consistency: function ()
## check_euclidean: function ()
## clear_observations: function ()
## clone: function (deep = FALSE)
## CoB: NULL
## compute_characteristics: function (check_euclidean = FALSE)
## compute_fem: function (petrov = FALSE)
## compute_geodist: function (full = FALSE, obs = TRUE, group = NULL, verbose = 0)
## compute_geodist_mesh: function ()
## compute_geodist_PtE: function (PtE, normalized = TRUE, include_vertices = TRUE, verbose = 0)
## compute_laplacian: function (full = FALSE, obs = TRUE, group = NULL, verbose = 0)
## compute_PtE_edges: function ()
## compute_resdist: function (full = FALSE, obs = TRUE, group = NULL, check_euclidean = FALSE,
## compute_resdist_mesh: function ()
## compute_resdist_PtE: function (PtE, normalized = TRUE, include_vertices = FALSE, check_euclidean = FALSE,
## coordinates: function (PtE = NULL, XY = NULL, normalized = TRUE)
## drop_na: function (...)
## E: 1 3 3 6 4 7 9 11 13 14 15 16 18 19 20 21 23 25 27 29 31 ...
## edge_lengths: 0.0363234139144278 0.01586106867077 0.027923568765887 0. ...
## edges: metric_graph_edges
## edgeweight_to_data: function (loc = NULL, mesh = FALSE, data_loc = FALSE, weight_col = NULL,
## fem_basis: function (PtE)
## filter: function (..., .drop_na = FALSE, .drop_all_na = TRUE)
## geo_dist: list
## get_data: function (group = NULL, tibble = TRUE, drop_na = FALSE, drop_all_na = TRUE)
## get_degrees: function (which = "degree")
## get_edge_lengths: function (unit = NULL)
## get_edge_weights: function (data.frame = FALSE, tibble = TRUE)
## get_groups: function (get_cols = FALSE)
## get_initial_graph: function ()
## get_locations: function ()
## get_mesh_locations: function (bru = FALSE, loc = NULL, normalized = TRUE)
## get_PtE: function ()
## get_vertices_incomp_dir: function ()
## initialize: function (edges = NULL, V = NULL, E = NULL, vertex_unit = NULL,
## is_tree: function ()
## Laplacian: NULL
## mesh: list
## mesh_A: function (PtE)
## mutate: function (..., .drop_na = FALSE, .drop_all_na = TRUE)
## nE: 6827
## nV: 4017
## observation_to_vertex: function (tolerance = 1e-15, mesh_warning = TRUE)
## plot: function (data = NULL, newdata = NULL, group = 1, plotly = FALSE,
## plot_connections: function ()
## plot_function: function (data = NULL, newdata = NULL, group = 1, X = NULL, plotly = FALSE,
## plot_movie: function (X, plotly = TRUE, vertex_size = 5, vertex_color = "black",
## print: function ()
## process_data: function (data = NULL, edge_number = "edge_number", distance_on_edge = "distance_on_edge",
## prune_vertices: function (check_weights = TRUE, verbose = FALSE)
## PtV: NULL
## res_dist: NULL
## select: function (..., .drop_na = FALSE, .drop_all_na = TRUE)
## set_edge_weights: function (weights = rep(1, self$nE), kirchhoff_weights = NULL)
## summarise: function (..., .include_graph_groups = FALSE, .groups = NULL,
## summary: function (messages = FALSE, compute_characteristics = TRUE, check_euclidean = TRUE,
## V: -122.41277 -122.41249 -122.40376 -122.40358 -122.40379 - ...
## vertices: metric_graph_vertices
## VtEfirst: function ()
## Private:
## A: function (group = NULL, obs_to_vert = FALSE, drop_na = FALSE,
## add_vertices: function (PtE, tolerance = 1e-10, verbose)
## addinfo: FALSE
## clear_initial_info: function ()
## compute_degrees: function ()
## compute_laplacian_PtE: function (PtE, normalized = TRUE, verbose = verbose)
## compute_lengths: function (longlat, unit, crs, proj4string, which_longlat, vertex_unit,
## connected: TRUE
## coordinates_multiple_snaps: function (XY, tolerance, verbose = verbose, crs, proj4string,
## create_update_vertices: function ()
## crs: crs
## data: metric_graph_data, list
## edge_weights: tbl_df, tbl, data.frame
## find_edge_edge_points: function (tol, verbose, crs, proj4string, longlat, fact, which_longlat)
## find_mesh_bc: function ()
## get_edge_weights_internal: function (data.frame = FALSE)
## group_col: .group
## initial_edges_added: NULL
## initial_graph: metric_graph, R6
## kirchhoff_weights: NULL
## length_unit: km
## line_to_vertex: function (tolerance = 0, longlat = FALSE, fact, verbose, crs,
## longlat: TRUE
## merge_close_vertices: function (tolerance, fact)
## merge.all.deg2: function ()
## mesh_merge_deg2: function ()
## mesh_merge_outs: function ()
## move_V_first: function ()
## plot_2d: function (line_width = 0.1, marker_size = 1, vertex_color = "black",
## plot_3d: function (line_width = 1, marker_size = 1, vertex_color = "rgb(0,0,0)",
## proj4string: NULL
## prune_warning: FALSE
## pruned: FALSE
## PtE_to_mesh: function (PtE)
## ref_edges: 1 1552 2 5 3133 4 6 395 7 526 8 6466 9 10 11 12 38 13 14 ...
## remove_circles: function (threshold, verbose, longlat, unit, crs, proj4string,
## remove.first.deg2: function (res)
## set_first_weights: function (weights = rep(1, self$nE))
## set_petrov_matrices: function ()
## split_edge: function (Ei, t, tolerance = 0)
## temp_PtE: NULL
## tolerance: list
## transform: FALSE
## vertex_unit: degrees
## which_longlat: sf
## .. .. .. .. .. .. ..$ fem_mesh :List of 4
## .. .. .. .. .. .. .. ..$ c0:Formal class 'dgTMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. .. .. .. .. ..@ i : int [1:7169] 0 1 2 3 4 5 6 7 8 9 ...
## .. .. .. .. .. .. .. .. .. ..@ j : int [1:7169] 0 1 2 3 4 5 6 7 8 9 ...
## .. .. .. .. .. .. .. .. .. ..@ Dim : int [1:2] 7169 7169
## .. .. .. .. .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. .. .. .. ..@ x : num [1:7169] 0.0797 0.1564 0.1117 0.0493 0.0614 ...
## .. .. .. .. .. .. .. .. .. ..@ factors : list()
## .. .. .. .. .. .. .. ..$ g1:Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. .. .. .. .. ..@ i : int [1:24879] 0 1 985 0 1 1700 5207 5364 6858 7041 ...
## .. .. .. .. .. .. .. .. .. ..@ p : int [1:7170] 0 3 10 16 20 23 27 36 44 50 ...
## .. .. .. .. .. .. .. .. .. ..@ Dim : int [1:2] 7169 7169
## .. .. .. .. .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. .. .. .. ..@ x : num [1:24879] 101.1 -55.1 -46.1 -55.1 216.4 ...
## .. .. .. .. .. .. .. .. .. ..@ factors : list()
## .. .. .. .. .. .. .. ..$ g2:Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. .. .. .. .. ..@ i : int [1:56007] 0 1 985 986 1700 4722 5207 5364 6240 6858 ...
## .. .. .. .. .. .. .. .. .. ..@ p : int [1:7170] 0 11 22 34 43 52 61 76 89 99 ...
## .. .. .. .. .. .. .. .. .. ..@ Dim : int [1:2] 7169 7169
## .. .. .. .. .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. .. .. .. ..@ x : num [1:56007] 172097 -145986 -232979 119006 15770 ...
## .. .. .. .. .. .. .. .. .. ..@ factors : list()
## .. .. .. .. .. .. .. ..$ g3:Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. .. .. .. .. ..@ i : int [1:96755] 0 1 230 984 985 986 1700 1701 2280 2455 ...
## .. .. .. .. .. .. .. .. .. ..@ p : int [1:7170] 0 17 35 57 76 91 103 126 150 166 ...
## .. .. .. .. .. .. .. .. .. ..@ Dim : int [1:2] 7169 7169
## .. .. .. .. .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. .. .. .. ..@ x : num [1:96755] 3.94e+08 -3.74e+08 -2.65e+07 -9.14e+07 -1.47e+09 ...
## .. .. .. .. .. .. .. .. .. ..@ factors : list()
## .. .. .. .. .. .. ..$ parameterization : chr "matern"
## .. .. .. .. .. .. ..$ n.spde : int 7169
## .. .. .. .. .. .. ..- attr(*, "class")= chr [1:3] "rspde_metric_graph" "inla_rspde" "inla.cgeneric"
## .. .. .. .. .. ..- attr(*, "class")= chr [1:3] "bru_mapper_inla_rspde" "bru_mapper" "list"
## .. .. .. .. ..$ model :List of 21
## .. .. .. .. .. ..$ f :List of 3
## .. .. .. .. .. .. ..$ model : chr "cgeneric"
## .. .. .. .. .. .. ..$ n : int 7169
## .. .. .. .. .. .. ..$ cgeneric:List of 5
## .. .. .. .. .. .. .. ..$ model: chr "inla_cgeneric_rspde_stat_int_model"
## .. .. .. .. .. .. .. ..$ shlib: chr "/home/rierasl/R/x86_64-pc-linux-gnu-library/4.4/INLA/bin/linux/64bit/external/rSPDE/librSPDE.so"
## .. .. .. .. .. .. .. ..$ n : int 7169
## .. .. .. .. .. .. .. ..$ debug: logi FALSE
## .. .. .. .. .. .. .. ..$ data :List of 5
## .. .. .. .. .. .. .. .. ..$ ints :List of 5
## .. .. .. .. .. .. .. .. .. ..$ n : int 7169
## .. .. .. .. .. .. .. .. .. ..$ debug : int 0
## .. .. .. .. .. .. .. .. .. ..$ m_alpha : int 1
## .. .. .. .. .. .. .. .. .. ..$ graph_opt_i: int [1:16024] 0 0 0 1 1 1 1 1 1 2 ...
## .. .. .. .. .. .. .. .. .. ..$ graph_opt_j: int [1:16024] 0 1 985 1 1700 5207 5364 6858 7041 2 ...
## .. .. .. .. .. .. .. .. ..$ doubles :List of 4
## .. .. .. .. .. .. .. .. .. ..$ matrices_less : num [1:32048] 0.0797 0 0 0.1564 0 ...
## .. .. .. .. .. .. .. .. .. ..$ theta.prior.mean: num [1:2] 0 0.223
## .. .. .. .. .. .. .. .. .. ..$ start.theta : num [1:2] 0 0.223
## .. .. .. .. .. .. .. .. .. ..$ nu : num 0.5
## .. .. .. .. .. .. .. .. ..$ characters:List of 4
## .. .. .. .. .. .. .. .. .. ..$ model : chr "inla_cgeneric_rspde_stat_int_model"
## .. .. .. .. .. .. .. .. .. ..$ shlib : chr "/home/rierasl/R/x86_64-pc-linux-gnu-library/4.4/INLA/bin/linux/64bit/external/rSPDE/librSPDE.so"
## .. .. .. .. .. .. .. .. .. ..$ parameterization : chr "matern"
## .. .. .. .. .. .. .. .. .. ..$ prior.theta.param: chr "theta"
## .. .. .. .. .. .. .. .. ..$ matrices :List of 1
## .. .. .. .. .. .. .. .. .. ..$ theta.prior.prec: num [1:6] 2 2 0.1 0 0 0.1
## .. .. .. .. .. .. .. .. ..$ smatrices : list()
## .. .. .. .. .. .. .. ..- attr(*, "class")= chr "inla.cgeneric"
## .. .. .. .. .. ..$ cgeneric_type : chr "int_alpha"
## .. .. .. .. .. ..$ nu : num 0.5
## .. .. .. .. .. ..$ theta.prior.mean : num [1:2] 0 0.223
## .. .. .. .. .. ..$ prior.nu :List of 4
## .. .. .. .. .. .. ..$ loglocation: num -5e-06
## .. .. .. .. .. .. ..$ mean : num 1
## .. .. .. .. .. .. ..$ prec : num 3
## .. .. .. .. .. .. ..$ logscale : num 1
## .. .. .. .. .. ..$ theta.prior.prec : num [1:2, 1:2] 0.1 0 0 0.1
## .. .. .. .. .. ..$ start.nu : num 0.5
## .. .. .. .. .. ..$ integer.nu : logi TRUE
## .. .. .. .. .. ..$ start.theta : num [1:2] 0 0.223
## .. .. .. .. .. ..$ stationary : logi TRUE
## .. .. .. .. .. ..$ rspde.order : num 2
## .. .. .. .. .. ..$ dim : num 1
## .. .. .. .. .. ..$ est_nu : logi FALSE
## .. .. .. .. .. ..$ nu.upper.bound : num 2
## .. .. .. .. .. ..$ prior.nu.dist : chr "lognormal"
## .. .. .. .. .. ..$ debug : logi FALSE
## .. .. .. .. .. ..$ type.rational.approx: chr "chebfun"
## .. .. .. .. .. ..$ mesh :Classes 'metric_graph', 'R6' <metric_graph>
## Public:
## add_mesh_observations: function (data = NULL, group = NULL)
## add_observations: function (data = NULL, edge_number = "edge_number", distance_on_edge = "distance_on_edge",
## build_mesh: function (h = NULL, n = NULL, continuous = TRUE, continuous.outs = FALSE,
## buildC: function (alpha = 2, edge_constraint = FALSE)
## buildDirectionalConstraints: function (alpha = 1)
## C: NULL
## characteristics: list
## check_distance_consistency: function ()
## check_euclidean: function ()
## clear_observations: function ()
## clone: function (deep = FALSE)
## CoB: NULL
## compute_characteristics: function (check_euclidean = FALSE)
## compute_fem: function (petrov = FALSE)
## compute_geodist: function (full = FALSE, obs = TRUE, group = NULL, verbose = 0)
## compute_geodist_mesh: function ()
## compute_geodist_PtE: function (PtE, normalized = TRUE, include_vertices = TRUE, verbose = 0)
## compute_laplacian: function (full = FALSE, obs = TRUE, group = NULL, verbose = 0)
## compute_PtE_edges: function ()
## compute_resdist: function (full = FALSE, obs = TRUE, group = NULL, check_euclidean = FALSE,
## compute_resdist_mesh: function ()
## compute_resdist_PtE: function (PtE, normalized = TRUE, include_vertices = FALSE, check_euclidean = FALSE,
## coordinates: function (PtE = NULL, XY = NULL, normalized = TRUE)
## drop_na: function (...)
## E: 1 3 3 6 4 7 9 11 13 14 15 16 18 19 20 21 23 25 27 29 31 ...
## edge_lengths: 0.0363234139144278 0.01586106867077 0.027923568765887 0. ...
## edges: metric_graph_edges
## edgeweight_to_data: function (loc = NULL, mesh = FALSE, data_loc = FALSE, weight_col = NULL,
## fem_basis: function (PtE)
## filter: function (..., .drop_na = FALSE, .drop_all_na = TRUE)
## geo_dist: list
## get_data: function (group = NULL, tibble = TRUE, drop_na = FALSE, drop_all_na = TRUE)
## get_degrees: function (which = "degree")
## get_edge_lengths: function (unit = NULL)
## get_edge_weights: function (data.frame = FALSE, tibble = TRUE)
## get_groups: function (get_cols = FALSE)
## get_initial_graph: function ()
## get_locations: function ()
## get_mesh_locations: function (bru = FALSE, loc = NULL, normalized = TRUE)
## get_PtE: function ()
## get_vertices_incomp_dir: function ()
## initialize: function (edges = NULL, V = NULL, E = NULL, vertex_unit = NULL,
## is_tree: function ()
## Laplacian: NULL
## mesh: list
## mesh_A: function (PtE)
## mutate: function (..., .drop_na = FALSE, .drop_all_na = TRUE)
## nE: 6827
## nV: 4017
## observation_to_vertex: function (tolerance = 1e-15, mesh_warning = TRUE)
## plot: function (data = NULL, newdata = NULL, group = 1, plotly = FALSE,
## plot_connections: function ()
## plot_function: function (data = NULL, newdata = NULL, group = 1, X = NULL, plotly = FALSE,
## plot_movie: function (X, plotly = TRUE, vertex_size = 5, vertex_color = "black",
## print: function ()
## process_data: function (data = NULL, edge_number = "edge_number", distance_on_edge = "distance_on_edge",
## prune_vertices: function (check_weights = TRUE, verbose = FALSE)
## PtV: NULL
## res_dist: NULL
## select: function (..., .drop_na = FALSE, .drop_all_na = TRUE)
## set_edge_weights: function (weights = rep(1, self$nE), kirchhoff_weights = NULL)
## summarise: function (..., .include_graph_groups = FALSE, .groups = NULL,
## summary: function (messages = FALSE, compute_characteristics = TRUE, check_euclidean = TRUE,
## V: -122.41277 -122.41249 -122.40376 -122.40358 -122.40379 - ...
## vertices: metric_graph_vertices
## VtEfirst: function ()
## Private:
## A: function (group = NULL, obs_to_vert = FALSE, drop_na = FALSE,
## add_vertices: function (PtE, tolerance = 1e-10, verbose)
## addinfo: FALSE
## clear_initial_info: function ()
## compute_degrees: function ()
## compute_laplacian_PtE: function (PtE, normalized = TRUE, verbose = verbose)
## compute_lengths: function (longlat, unit, crs, proj4string, which_longlat, vertex_unit,
## connected: TRUE
## coordinates_multiple_snaps: function (XY, tolerance, verbose = verbose, crs, proj4string,
## create_update_vertices: function ()
## crs: crs
## data: metric_graph_data, list
## edge_weights: tbl_df, tbl, data.frame
## find_edge_edge_points: function (tol, verbose, crs, proj4string, longlat, fact, which_longlat)
## find_mesh_bc: function ()
## get_edge_weights_internal: function (data.frame = FALSE)
## group_col: .group
## initial_edges_added: NULL
## initial_graph: metric_graph, R6
## kirchhoff_weights: NULL
## length_unit: km
## line_to_vertex: function (tolerance = 0, longlat = FALSE, fact, verbose, crs,
## longlat: TRUE
## merge_close_vertices: function (tolerance, fact)
## merge.all.deg2: function ()
## mesh_merge_deg2: function ()
## mesh_merge_outs: function ()
## move_V_first: function ()
## plot_2d: function (line_width = 0.1, marker_size = 1, vertex_color = "black",
## plot_3d: function (line_width = 1, marker_size = 1, vertex_color = "rgb(0,0,0)",
## proj4string: NULL
## prune_warning: FALSE
## pruned: FALSE
## PtE_to_mesh: function (PtE)
## ref_edges: 1 1552 2 5 3133 4 6 395 7 526 8 6466 9 10 11 12 38 13 14 ...
## remove_circles: function (threshold, verbose, longlat, unit, crs, proj4string,
## remove.first.deg2: function (res)
## set_first_weights: function (weights = rep(1, self$nE))
## set_petrov_matrices: function ()
## split_edge: function (Ei, t, tolerance = 0)
## temp_PtE: NULL
## tolerance: list
## transform: FALSE
## vertex_unit: degrees
## which_longlat: sf
## .. .. .. .. .. ..$ fem_mesh :List of 4
## .. .. .. .. .. .. ..$ c0:Formal class 'dgTMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. .. .. .. ..@ i : int [1:7169] 0 1 2 3 4 5 6 7 8 9 ...
## .. .. .. .. .. .. .. .. ..@ j : int [1:7169] 0 1 2 3 4 5 6 7 8 9 ...
## .. .. .. .. .. .. .. .. ..@ Dim : int [1:2] 7169 7169
## .. .. .. .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. .. .. ..@ x : num [1:7169] 0.0797 0.1564 0.1117 0.0493 0.0614 ...
## .. .. .. .. .. .. .. .. ..@ factors : list()
## .. .. .. .. .. .. ..$ g1:Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. .. .. .. ..@ i : int [1:24879] 0 1 985 0 1 1700 5207 5364 6858 7041 ...
## .. .. .. .. .. .. .. .. ..@ p : int [1:7170] 0 3 10 16 20 23 27 36 44 50 ...
## .. .. .. .. .. .. .. .. ..@ Dim : int [1:2] 7169 7169
## .. .. .. .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. .. .. ..@ x : num [1:24879] 101.1 -55.1 -46.1 -55.1 216.4 ...
## .. .. .. .. .. .. .. .. ..@ factors : list()
## .. .. .. .. .. .. ..$ g2:Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. .. .. .. ..@ i : int [1:56007] 0 1 985 986 1700 4722 5207 5364 6240 6858 ...
## .. .. .. .. .. .. .. .. ..@ p : int [1:7170] 0 11 22 34 43 52 61 76 89 99 ...
## .. .. .. .. .. .. .. .. ..@ Dim : int [1:2] 7169 7169
## .. .. .. .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. .. .. ..@ x : num [1:56007] 172097 -145986 -232979 119006 15770 ...
## .. .. .. .. .. .. .. .. ..@ factors : list()
## .. .. .. .. .. .. ..$ g3:Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. .. .. .. ..@ i : int [1:96755] 0 1 230 984 985 986 1700 1701 2280 2455 ...
## .. .. .. .. .. .. .. .. ..@ p : int [1:7170] 0 17 35 57 76 91 103 126 150 166 ...
## .. .. .. .. .. .. .. .. ..@ Dim : int [1:2] 7169 7169
## .. .. .. .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. .. .. ..@ x : num [1:96755] 3.94e+08 -3.74e+08 -2.65e+07 -9.14e+07 -1.47e+09 ...
## .. .. .. .. .. .. .. .. ..@ factors : list()
## .. .. .. .. .. ..$ parameterization : chr "matern"
## .. .. .. .. .. ..$ n.spde : int 7169
## .. .. .. .. .. ..- attr(*, "class")= chr [1:3] "rspde_metric_graph" "inla_rspde" "inla.cgeneric"
## .. .. .. .. ..$ type : chr "cgeneric"
## .. .. .. .. ..$ n : num 7169
## .. .. .. .. ..$ values : int [1:7169] 1 2 3 4 5 6 7 8 9 10 ...
## .. .. .. .. ..$ season.length : NULL
## .. .. .. .. ..$ factor_mapping: NULL
## .. .. .. .. ..- attr(*, "class")= chr [1:2] "bru_subcomponent" "list"
## .. .. .. ..$ group :List of 8
## .. .. .. .. ..$ input :List of 4
## .. .. .. .. .. ..$ input : int 1
## .. .. .. .. .. ..$ label : chr "field.group"
## .. .. .. .. .. ..$ layer : NULL
## .. .. .. .. .. ..$ selector: NULL
## .. .. .. .. .. ..- attr(*, "class")= chr [1:2] "bru_input" "list"
## .. .. .. .. ..$ mapper :List of 1
## .. .. .. .. .. ..$ n: num 1
## .. .. .. .. .. ..- attr(*, "class")= chr [1:3] "bru_mapper_index" "bru_mapper" "list"
## .. .. .. .. ..$ model : chr "exchangeable"
## .. .. .. .. ..$ type : chr "exchangeable"
## .. .. .. .. ..$ n : num 1
## .. .. .. .. ..$ values : int 1
## .. .. .. .. ..$ season.length : NULL
## .. .. .. .. ..$ factor_mapping: NULL
## .. .. .. .. ..- attr(*, "class")= chr [1:2] "bru_subcomponent" "list"
## .. .. .. ..$ replicate :List of 8
## .. .. .. .. ..$ input :List of 4
## .. .. .. .. .. ..$ input : language data_rspde_bru_stat[["repl"]]
## .. .. .. .. .. ..$ label : chr "field.repl"
## .. .. .. .. .. ..$ layer : NULL
## .. .. .. .. .. ..$ selector: NULL
## .. .. .. .. .. ..- attr(*, "class")= chr [1:2] "bru_input" "list"
## .. .. .. .. ..$ mapper :List of 4
## .. .. .. .. .. ..$ levels : chr [1:4] "1" "2" "3" "4"
## .. .. .. .. .. ..$ factor_mapping: chr "full"
## .. .. .. .. .. ..$ indexed : logi TRUE
## .. .. .. .. .. ..$ n : int 4
## .. .. .. .. .. ..- attr(*, "class")= chr [1:4] "bru_mapper_factor_index" "bru_mapper_factor" "bru_mapper" "list"
## .. .. .. .. ..$ model : chr "iid"
## .. .. .. .. ..$ type : chr "iid"
## .. .. .. .. ..$ n : int 4
## .. .. .. .. ..$ values : int [1:4] 1 2 3 4
## .. .. .. .. ..$ season.length : NULL
## .. .. .. .. ..$ factor_mapping: NULL
## .. .. .. .. ..- attr(*, "class")= chr [1:2] "bru_subcomponent" "list"
## .. .. .. ..$ weights : NULL
## .. .. .. ..$ copy : NULL
## .. .. .. ..$ marginal : NULL
## .. .. .. ..$ env :<environment: R_GlobalEnv>
## .. .. .. ..$ env_extra :<environment: 0x5b13c2887f10>
## .. .. .. ..$ fcall : language "f"(field, model = BRU_field_main_model, replicate = field.repl, ngroup = 1, nrep = 4L, values = BRU_field_values)
## .. .. .. ..$ mapper :List of 6
## .. .. .. .. ..$ mappers :List of 2
## .. .. .. .. .. ..$ mapper:List of 9
## .. .. .. .. .. .. ..$ mappers :List of 3
## .. .. .. .. .. .. .. ..$ main :List of 1
## .. .. .. .. .. .. .. .. ..$ model:List of 21
## .. .. .. .. .. .. .. .. .. ..$ f :List of 3
## .. .. .. .. .. .. .. .. .. .. ..$ model : chr "cgeneric"
## .. .. .. .. .. .. .. .. .. .. ..$ n : int 7169
## .. .. .. .. .. .. .. .. .. .. ..$ cgeneric:List of 5
## .. .. .. .. .. .. .. .. .. .. .. ..$ model: chr "inla_cgeneric_rspde_stat_int_model"
## .. .. .. .. .. .. .. .. .. .. .. ..$ shlib: chr "/home/rierasl/R/x86_64-pc-linux-gnu-library/4.4/INLA/bin/linux/64bit/external/rSPDE/librSPDE.so"
## .. .. .. .. .. .. .. .. .. .. .. ..$ n : int 7169
## .. .. .. .. .. .. .. .. .. .. .. ..$ debug: logi FALSE
## .. .. .. .. .. .. .. .. .. .. .. ..$ data :List of 5
## .. .. .. .. .. .. .. .. .. .. .. .. ..$ ints :List of 5
## .. .. .. .. .. .. .. .. .. .. .. .. .. ..$ n : int 7169
## .. .. .. .. .. .. .. .. .. .. .. .. .. ..$ debug : int 0
## .. .. .. .. .. .. .. .. .. .. .. .. .. ..$ m_alpha : int 1
## .. .. .. .. .. .. .. .. .. .. .. .. .. ..$ graph_opt_i: int [1:16024] 0 0 0 1 1 1 1 1 1 2 ...
## .. .. .. .. .. .. .. .. .. .. .. .. .. ..$ graph_opt_j: int [1:16024] 0 1 985 1 1700 5207 5364 6858 7041 2 ...
## .. .. .. .. .. .. .. .. .. .. .. .. ..$ doubles :List of 4
## .. .. .. .. .. .. .. .. .. .. .. .. .. ..$ matrices_less : num [1:32048] 0.0797 0 0 0.1564 0 ...
## .. .. .. .. .. .. .. .. .. .. .. .. .. ..$ theta.prior.mean: num [1:2] 0 0.223
## .. .. .. .. .. .. .. .. .. .. .. .. .. ..$ start.theta : num [1:2] 0 0.223
## .. .. .. .. .. .. .. .. .. .. .. .. .. ..$ nu : num 0.5
## .. .. .. .. .. .. .. .. .. .. .. .. ..$ characters:List of 4
## .. .. .. .. .. .. .. .. .. .. .. .. .. ..$ model : chr "inla_cgeneric_rspde_stat_int_model"
## .. .. .. .. .. .. .. .. .. .. .. .. .. ..$ shlib : chr "/home/rierasl/R/x86_64-pc-linux-gnu-library/4.4/INLA/bin/linux/64bit/external/rSPDE/librSPDE.so"
## .. .. .. .. .. .. .. .. .. .. .. .. .. ..$ parameterization : chr "matern"
## .. .. .. .. .. .. .. .. .. .. .. .. .. ..$ prior.theta.param: chr "theta"
## .. .. .. .. .. .. .. .. .. .. .. .. ..$ matrices :List of 1
## .. .. .. .. .. .. .. .. .. .. .. .. .. ..$ theta.prior.prec: num [1:6] 2 2 0.1 0 0 0.1
## .. .. .. .. .. .. .. .. .. .. .. .. ..$ smatrices : list()
## .. .. .. .. .. .. .. .. .. .. .. ..- attr(*, "class")= chr "inla.cgeneric"
## .. .. .. .. .. .. .. .. .. ..$ cgeneric_type : chr "int_alpha"
## .. .. .. .. .. .. .. .. .. ..$ nu : num 0.5
## .. .. .. .. .. .. .. .. .. ..$ theta.prior.mean : num [1:2] 0 0.223
## .. .. .. .. .. .. .. .. .. ..$ prior.nu :List of 4
## .. .. .. .. .. .. .. .. .. .. ..$ loglocation: num -5e-06
## .. .. .. .. .. .. .. .. .. .. ..$ mean : num 1
## .. .. .. .. .. .. .. .. .. .. ..$ prec : num 3
## .. .. .. .. .. .. .. .. .. .. ..$ logscale : num 1
## .. .. .. .. .. .. .. .. .. ..$ theta.prior.prec : num [1:2, 1:2] 0.1 0 0 0.1
## .. .. .. .. .. .. .. .. .. ..$ start.nu : num 0.5
## .. .. .. .. .. .. .. .. .. ..$ integer.nu : logi TRUE
## .. .. .. .. .. .. .. .. .. ..$ start.theta : num [1:2] 0 0.223
## .. .. .. .. .. .. .. .. .. ..$ stationary : logi TRUE
## .. .. .. .. .. .. .. .. .. ..$ rspde.order : num 2
## .. .. .. .. .. .. .. .. .. ..$ dim : num 1
## .. .. .. .. .. .. .. .. .. ..$ est_nu : logi FALSE
## .. .. .. .. .. .. .. .. .. ..$ nu.upper.bound : num 2
## .. .. .. .. .. .. .. .. .. ..$ prior.nu.dist : chr "lognormal"
## .. .. .. .. .. .. .. .. .. ..$ debug : logi FALSE
## .. .. .. .. .. .. .. .. .. ..$ type.rational.approx: chr "chebfun"
## .. .. .. .. .. .. .. .. .. ..$ mesh :Classes 'metric_graph', 'R6' <metric_graph>
## Public:
## add_mesh_observations: function (data = NULL, group = NULL)
## add_observations: function (data = NULL, edge_number = "edge_number", distance_on_edge = "distance_on_edge",
## build_mesh: function (h = NULL, n = NULL, continuous = TRUE, continuous.outs = FALSE,
## buildC: function (alpha = 2, edge_constraint = FALSE)
## buildDirectionalConstraints: function (alpha = 1)
## C: NULL
## characteristics: list
## check_distance_consistency: function ()
## check_euclidean: function ()
## clear_observations: function ()
## clone: function (deep = FALSE)
## CoB: NULL
## compute_characteristics: function (check_euclidean = FALSE)
## compute_fem: function (petrov = FALSE)
## compute_geodist: function (full = FALSE, obs = TRUE, group = NULL, verbose = 0)
## compute_geodist_mesh: function ()
## compute_geodist_PtE: function (PtE, normalized = TRUE, include_vertices = TRUE, verbose = 0)
## compute_laplacian: function (full = FALSE, obs = TRUE, group = NULL, verbose = 0)
## compute_PtE_edges: function ()
## compute_resdist: function (full = FALSE, obs = TRUE, group = NULL, check_euclidean = FALSE,
## compute_resdist_mesh: function ()
## compute_resdist_PtE: function (PtE, normalized = TRUE, include_vertices = FALSE, check_euclidean = FALSE,
## coordinates: function (PtE = NULL, XY = NULL, normalized = TRUE)
## drop_na: function (...)
## E: 1 3 3 6 4 7 9 11 13 14 15 16 18 19 20 21 23 25 27 29 31 ...
## edge_lengths: 0.0363234139144278 0.01586106867077 0.027923568765887 0. ...
## edges: metric_graph_edges
## edgeweight_to_data: function (loc = NULL, mesh = FALSE, data_loc = FALSE, weight_col = NULL,
## fem_basis: function (PtE)
## filter: function (..., .drop_na = FALSE, .drop_all_na = TRUE)
## geo_dist: list
## get_data: function (group = NULL, tibble = TRUE, drop_na = FALSE, drop_all_na = TRUE)
## get_degrees: function (which = "degree")
## get_edge_lengths: function (unit = NULL)
## get_edge_weights: function (data.frame = FALSE, tibble = TRUE)
## get_groups: function (get_cols = FALSE)
## get_initial_graph: function ()
## get_locations: function ()
## get_mesh_locations: function (bru = FALSE, loc = NULL, normalized = TRUE)
## get_PtE: function ()
## get_vertices_incomp_dir: function ()
## initialize: function (edges = NULL, V = NULL, E = NULL, vertex_unit = NULL,
## is_tree: function ()
## Laplacian: NULL
## mesh: list
## mesh_A: function (PtE)
## mutate: function (..., .drop_na = FALSE, .drop_all_na = TRUE)
## nE: 6827
## nV: 4017
## observation_to_vertex: function (tolerance = 1e-15, mesh_warning = TRUE)
## plot: function (data = NULL, newdata = NULL, group = 1, plotly = FALSE,
## plot_connections: function ()
## plot_function: function (data = NULL, newdata = NULL, group = 1, X = NULL, plotly = FALSE,
## plot_movie: function (X, plotly = TRUE, vertex_size = 5, vertex_color = "black",
## print: function ()
## process_data: function (data = NULL, edge_number = "edge_number", distance_on_edge = "distance_on_edge",
## prune_vertices: function (check_weights = TRUE, verbose = FALSE)
## PtV: NULL
## res_dist: NULL
## select: function (..., .drop_na = FALSE, .drop_all_na = TRUE)
## set_edge_weights: function (weights = rep(1, self$nE), kirchhoff_weights = NULL)
## summarise: function (..., .include_graph_groups = FALSE, .groups = NULL,
## summary: function (messages = FALSE, compute_characteristics = TRUE, check_euclidean = TRUE,
## V: -122.41277 -122.41249 -122.40376 -122.40358 -122.40379 - ...
## vertices: metric_graph_vertices
## VtEfirst: function ()
## Private:
## A: function (group = NULL, obs_to_vert = FALSE, drop_na = FALSE,
## add_vertices: function (PtE, tolerance = 1e-10, verbose)
## addinfo: FALSE
## clear_initial_info: function ()
## compute_degrees: function ()
## compute_laplacian_PtE: function (PtE, normalized = TRUE, verbose = verbose)
## compute_lengths: function (longlat, unit, crs, proj4string, which_longlat, vertex_unit,
## connected: TRUE
## coordinates_multiple_snaps: function (XY, tolerance, verbose = verbose, crs, proj4string,
## create_update_vertices: function ()
## crs: crs
## data: metric_graph_data, list
## edge_weights: tbl_df, tbl, data.frame
## find_edge_edge_points: function (tol, verbose, crs, proj4string, longlat, fact, which_longlat)
## find_mesh_bc: function ()
## get_edge_weights_internal: function (data.frame = FALSE)
## group_col: .group
## initial_edges_added: NULL
## initial_graph: metric_graph, R6
## kirchhoff_weights: NULL
## length_unit: km
## line_to_vertex: function (tolerance = 0, longlat = FALSE, fact, verbose, crs,
## longlat: TRUE
## merge_close_vertices: function (tolerance, fact)
## merge.all.deg2: function ()
## mesh_merge_deg2: function ()
## mesh_merge_outs: function ()
## move_V_first: function ()
## plot_2d: function (line_width = 0.1, marker_size = 1, vertex_color = "black",
## plot_3d: function (line_width = 1, marker_size = 1, vertex_color = "rgb(0,0,0)",
## proj4string: NULL
## prune_warning: FALSE
## pruned: FALSE
## PtE_to_mesh: function (PtE)
## ref_edges: 1 1552 2 5 3133 4 6 395 7 526 8 6466 9 10 11 12 38 13 14 ...
## remove_circles: function (threshold, verbose, longlat, unit, crs, proj4string,
## remove.first.deg2: function (res)
## set_first_weights: function (weights = rep(1, self$nE))
## set_petrov_matrices: function ()
## split_edge: function (Ei, t, tolerance = 0)
## temp_PtE: NULL
## tolerance: list
## transform: FALSE
## vertex_unit: degrees
## which_longlat: sf
## .. .. .. .. .. .. .. .. .. ..$ fem_mesh :List of 4
## .. .. .. .. .. .. .. .. .. .. ..$ c0:Formal class 'dgTMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. .. .. .. .. .. .. .. ..@ i : int [1:7169] 0 1 2 3 4 5 6 7 8 9 ...
## .. .. .. .. .. .. .. .. .. .. .. .. ..@ j : int [1:7169] 0 1 2 3 4 5 6 7 8 9 ...
## .. .. .. .. .. .. .. .. .. .. .. .. ..@ Dim : int [1:2] 7169 7169
## .. .. .. .. .. .. .. .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. .. .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. .. .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. .. .. .. .. .. .. ..@ x : num [1:7169] 0.0797 0.1564 0.1117 0.0493 0.0614 ...
## .. .. .. .. .. .. .. .. .. .. .. .. ..@ factors : list()
## .. .. .. .. .. .. .. .. .. .. ..$ g1:Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. .. .. .. .. .. .. .. ..@ i : int [1:24879] 0 1 985 0 1 1700 5207 5364 6858 7041 ...
## .. .. .. .. .. .. .. .. .. .. .. .. ..@ p : int [1:7170] 0 3 10 16 20 23 27 36 44 50 ...
## .. .. .. .. .. .. .. .. .. .. .. .. ..@ Dim : int [1:2] 7169 7169
## .. .. .. .. .. .. .. .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. .. .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. .. .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. .. .. .. .. .. .. ..@ x : num [1:24879] 101.1 -55.1 -46.1 -55.1 216.4 ...
## .. .. .. .. .. .. .. .. .. .. .. .. ..@ factors : list()
## .. .. .. .. .. .. .. .. .. .. ..$ g2:Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. .. .. .. .. .. .. .. ..@ i : int [1:56007] 0 1 985 986 1700 4722 5207 5364 6240 6858 ...
## .. .. .. .. .. .. .. .. .. .. .. .. ..@ p : int [1:7170] 0 11 22 34 43 52 61 76 89 99 ...
## .. .. .. .. .. .. .. .. .. .. .. .. ..@ Dim : int [1:2] 7169 7169
## .. .. .. .. .. .. .. .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. .. .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. .. .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. .. .. .. .. .. .. ..@ x : num [1:56007] 172097 -145986 -232979 119006 15770 ...
## .. .. .. .. .. .. .. .. .. .. .. .. ..@ factors : list()
## .. .. .. .. .. .. .. .. .. .. ..$ g3:Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. .. .. .. .. .. .. .. ..@ i : int [1:96755] 0 1 230 984 985 986 1700 1701 2280 2455 ...
## .. .. .. .. .. .. .. .. .. .. .. .. ..@ p : int [1:7170] 0 17 35 57 76 91 103 126 150 166 ...
## .. .. .. .. .. .. .. .. .. .. .. .. ..@ Dim : int [1:2] 7169 7169
## .. .. .. .. .. .. .. .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. .. .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. .. .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. .. .. .. .. .. .. ..@ x : num [1:96755] 3.94e+08 -3.74e+08 -2.65e+07 -9.14e+07 -1.47e+09 ...
## .. .. .. .. .. .. .. .. .. .. .. .. ..@ factors : list()
## .. .. .. .. .. .. .. .. .. ..$ parameterization : chr "matern"
## .. .. .. .. .. .. .. .. .. ..$ n.spde : int 7169
## .. .. .. .. .. .. .. .. .. ..- attr(*, "class")= chr [1:3] "rspde_metric_graph" "inla_rspde" "inla.cgeneric"
## .. .. .. .. .. .. .. .. ..- attr(*, "class")= chr [1:3] "bru_mapper_inla_rspde" "bru_mapper" "list"
## .. .. .. .. .. .. .. ..$ group :List of 1
## .. .. .. .. .. .. .. .. ..$ n: num 1
## .. .. .. .. .. .. .. .. ..- attr(*, "class")= chr [1:3] "bru_mapper_index" "bru_mapper" "list"
## .. .. .. .. .. .. .. ..$ replicate:List of 4
## .. .. .. .. .. .. .. .. ..$ levels : chr [1:4] "1" "2" "3" "4"
## .. .. .. .. .. .. .. .. ..$ factor_mapping: chr "full"
## .. .. .. .. .. .. .. .. ..$ indexed : logi TRUE
## .. .. .. .. .. .. .. .. ..$ n : int 4
## .. .. .. .. .. .. .. .. ..- attr(*, "class")= chr [1:4] "bru_mapper_factor_index" "bru_mapper_factor" "bru_mapper" "list"
## .. .. .. .. .. .. ..$ n_multi :List of 3
## .. .. .. .. .. .. .. ..$ main : num 7169
## .. .. .. .. .. .. .. ..$ group : num 1
## .. .. .. .. .. .. .. ..$ replicate: int 4
## .. .. .. .. .. .. ..$ n_inla_multi :List of 3
## .. .. .. .. .. .. .. ..$ main : num 7169
## .. .. .. .. .. .. .. ..$ group : num 1
## .. .. .. .. .. .. .. ..$ replicate: int 4
## .. .. .. .. .. .. ..$ values_multi :List of 3
## .. .. .. .. .. .. .. ..$ main : int [1:7169] 1 2 3 4 5 6 7 8 9 10 ...
## .. .. .. .. .. .. .. ..$ group : int 1
## .. .. .. .. .. .. .. ..$ replicate: int [1:4] 1 2 3 4
## .. .. .. .. .. .. ..$ values_inla_multi:List of 3
## .. .. .. .. .. .. .. ..$ main : int [1:7169] 1 2 3 4 5 6 7 8 9 10 ...
## .. .. .. .. .. .. .. ..$ group : int 1
## .. .. .. .. .. .. .. ..$ replicate: int [1:4] 1 2 3 4
## .. .. .. .. .. .. ..$ is_linear_multi :List of 3
## .. .. .. .. .. .. .. ..$ main : logi TRUE
## .. .. .. .. .. .. .. ..$ group : logi TRUE
## .. .. .. .. .. .. .. ..$ replicate: logi TRUE
## .. .. .. .. .. .. ..$ n : num 28676
## .. .. .. .. .. .. ..$ n_inla : num 28676
## .. .. .. .. .. .. ..$ is_linear : logi TRUE
## .. .. .. .. .. .. ..- attr(*, "class")= chr [1:3] "bru_mapper_multi" "bru_mapper" "list"
## .. .. .. .. .. ..$ scale : list()
## .. .. .. .. .. .. ..- attr(*, "class")= chr [1:3] "bru_mapper_scale" "bru_mapper" "list"
## .. .. .. .. ..$ : Named logi [1:2] TRUE TRUE
## .. .. .. .. .. ..- attr(*, "names")= chr [1:2] "mapper" "scale"
## .. .. .. .. ..$ is_linear: logi TRUE
## .. .. .. .. ..$ n_multi : Named int [1:2] 28676 NA
## .. .. .. .. .. ..- attr(*, "names")= chr [1:2] "mapper" "scale"
## .. .. .. .. ..$ n : num 28676
## .. .. .. .. ..$ names : chr [1:2] "mapper" "scale"
## .. .. .. .. ..- attr(*, "class")= chr [1:3] "bru_mapper_pipe" "bru_mapper" "list"
## .. .. .. ..- attr(*, "class")= chr [1:2] "component" "list"
## .. .. ..- attr(*, "class")= chr [1:2] "component_list" "list"
## .. .. ..- attr(*, ".Environment")=<environment: R_GlobalEnv>
## .. ..$ formula:Class 'formula' language BRU_response ~ f(Intercept, model = BRU_Intercept_main_model, ngroup = 1, nrep = 1, values = BRU_Intercept_v| __truncated__ ...
## .. .. .. ..- attr(*, ".Environment")=<environment: R_GlobalEnv>
## .. ..- attr(*, "class")= chr [1:2] "bru_model" "list"
## ..$ lhoods :List of 1
## .. ..$ :List of 17
## .. .. ..$ family : chr "nbinomial"
## .. .. ..$ formula :Class 'formula' language speed ~ .
## .. .. .. .. ..- attr(*, ".Environment")=<environment: 0x5b13c2fa00e8>
## .. .. ..$ response_data :List of 4
## .. .. .. ..$ BRU_response: num [1:14535] 0 12 24 32 0 19 22 19 30 14 ...
## .. .. .. ..$ BRU_E : num 1
## .. .. .. ..$ BRU_Ntrials : num 1
## .. .. .. ..$ BRU_scale : num 1
## .. .. ..$ data :List of 9
## .. .. .. ..$ speed : num [1:14535] 0 12 24 32 0 19 22 19 30 14 ...
## .. .. .. ..$ SpeedLimit : num [1:14535] -0.101 -0.617 -0.617 -0.617 -0.927 ...
## .. .. .. ..$ E : num [1:14535] 1 1 1 1 1 1 1 1 1 1 ...
## .. .. .. ..$ .coord_x : num [1:14535] -122 -122 -122 -122 -122 ...
## .. .. .. ..$ .coord_y : num [1:14535] 37.8 37.8 37.8 37.8 37.8 ...
## .. .. .. ..$ .edge_number : num [1:14535] 1 4 6 6 9 14 14 14 18 20 ...
## .. .. .. ..$ .distance_on_edge: num [1:14535] 0.437 0.144 0.252 0.658 0.601 ...
## .. .. .. ..$ .group : chr [1:14535] "1" "1" "1" "1" ...
## .. .. .. ..$ loc : num [1:14535, 1:2] 1 4 6 6 9 14 14 14 18 20 ...
## .. .. .. ..- attr(*, "class")= chr [1:2] "metric_graph_data" "list"
## .. .. ..$ E : num 1
## .. .. ..$ Ntrials : num 1
## .. .. ..$ weights : num 1
## .. .. ..$ scale : num 1
## .. .. ..$ samplers : NULL
## .. .. ..$ linear : logi TRUE
## .. .. ..$ expr : NULL
## .. .. ..$ response : chr "BRU_response"
## .. .. ..$ inla.family : chr "nbinomial"
## .. .. ..$ domain : NULL
## .. .. ..$ used :List of 2
## .. .. .. ..$ effect: chr [1:3] "Intercept" "SpeedLimit" "field"
## .. .. .. ..$ latent: chr(0)
## .. .. .. ..- attr(*, "class")= chr "bru_used"
## .. .. ..$ allow_combine : logi TRUE
## .. .. ..$ control.family: NULL
## .. .. ..- attr(*, "class")= chr [1:2] "bru_like" "list"
## .. ..- attr(*, "class")= chr [1:2] "bru_like_list" "list"
## ..$ options :List of 14
## .. ..$ bru_verbose : num 0
## .. ..$ bru_verbose_store: num Inf
## .. ..$ bru_max_iter : num 1
## .. ..$ bru_run : logi TRUE
## .. ..$ bru_int_args :List of 3
## .. .. ..$ method: chr "stable"
## .. .. ..$ nsub1 : num 30
## .. .. ..$ nsub2 : num 9
## .. ..$ bru_method :List of 6
## .. .. ..$ taylor : chr "pandemic"
## .. .. ..$ search : chr "all"
## .. .. ..$ factor : num 1.62
## .. .. ..$ rel_tol : num 0.1
## .. .. ..$ max_step : num 2
## .. .. ..$ line_opt_method: chr "onestep"
## .. ..$ bru_compress_cp : logi TRUE
## .. ..$ bru_debug : logi FALSE
## .. ..$ E : num 1
## .. ..$ Ntrials : num 1
## .. ..$ control.compute :List of 3
## .. .. ..$ config: logi TRUE
## .. .. ..$ dic : logi TRUE
## .. .. ..$ waic : logi TRUE
## .. ..$ control.inla :List of 1
## .. .. ..$ int.strategy: chr "auto"
## .. ..$ control.fixed :List of 1
## .. .. ..$ expand.factor.strategy: chr "inla"
## .. ..$ verbose : logi FALSE
## .. ..- attr(*, "class")= chr [1:2] "bru_options" "list"
## ..$ inlabru_version: Named chr "2.10.1.9004"
## .. ..- attr(*, "names")= chr "version"
## ..$ INLA_version : Named chr "24.04.25-1"
## .. ..- attr(*, "names")= chr "version"
## ..- attr(*, "class")= chr [1:2] "bru_info" "list"
## - attr(*, "class")= chr [1:3] "bru" "iinla" "inla"stat.time.fin <- Sys.time()
print(stat.time.fin - stat.time.ini)## Time difference of 33.96821 secs
summary(rspde_fit_stat)## inlabru version: 2.10.1.9004
## INLA version: 24.04.25-1
## Components:
## Intercept: main = linear(1), group = exchangeable(1L), replicate = iid(1L)
## SpeedLimit: main = linear(SpeedLimit), group = exchangeable(1L), replicate = iid(1L)
## field: main = cgeneric(loc), group = exchangeable(1L), replicate = iid(data_rspde_bru_stat[["repl"]])
## Likelihoods:
## Family: 'nbinomial'
## Data class: 'metric_graph_data', 'list'
## Predictor: speed ~ .
## Time used:
## Pre = 0.361, Running = 7.08, Post = 1.54, Total = 8.98
## Fixed effects:
## mean sd 0.025quant 0.5quant 0.975quant mode kld
## Intercept 2.925 0.024 2.879 2.924 2.972 2.924 0
## SpeedLimit 0.120 0.011 0.097 0.120 0.142 0.120 0
##
## Random effects:
## Name Model
## field CGeneric
##
## Model hyperparameters:
## mean sd 0.025quant
## size for the nbinomial observations (1/overdispersion) 1.706 0.028 1.653
## Theta1 for field -0.359 0.103 -0.574
## Theta2 for field -0.101 0.272 -0.675
## 0.5quant 0.975quant
## size for the nbinomial observations (1/overdispersion) 1.706 1.762
## Theta1 for field -0.355 -0.172
## Theta2 for field -0.089 0.393
## mode
## size for the nbinomial observations (1/overdispersion) 1.706
## Theta1 for field -0.334
## Theta2 for field -0.029
##
## Deviance Information Criterion (DIC) ...............: 113016.19
## Deviance Information Criterion (DIC, saturated) ....: 18808.07
## Effective number of parameters .....................: 937.81
##
## Watanabe-Akaike information criterion (WAIC) ...: 112652.21
## Effective number of parameters .................: 536.09
##
## Marginal log-Likelihood: -56726.23
## is computed
## Posterior summaries for the linear predictor and the fitted values are computed
## (Posterior marginals needs also 'control.compute=list(return.marginals.predictor=TRUE)')
fit.rspde = rspde.result(rspde_fit_stat, "field", rspde_model_stat)
summary(fit.rspde)## mean sd 0.025quant 0.5quant 0.975quant mode
## std.dev 0.701742 0.070791 0.564235 0.702134 0.840866 0.708155
## range 0.936798 0.248120 0.512053 0.918953 1.476020 0.884082
nonstat.time.ini <- Sys.time()
################################################################################
############################# NON STATIONARY MODEL #############################
################################################################################
B.sigma = cbind(0, 1, 0, mesh$SpeedLimit, 0)
B.range = cbind(0, 0, 1, 0, mesh$SpeedLimit)
init.vec.theta = c(fit.rspde$summary.log.std.dev$mode,
fit.rspde$summary.log.range$mode,
rep(0, (ncol(B.sigma)-3)))
rspde_model_nonstat <- rspde.metric_graph(sf_graph,
start.theta = init.vec.theta,
theta.prior.mean = init.vec.theta,
B.sigma = B.sigma,
B.range = B.range,
parameterization = "matern",
nu = 0.5)str(rspde_model_nonstat)
## List of 21
## $ f :List of 3
## ..$ model : chr "cgeneric"
## ..$ n : int 7169
## ..$ cgeneric:List of 5
## .. ..$ model: chr "inla_cgeneric_rspde_nonstat_int_model"
## .. ..$ shlib: chr "/home/rierasl/R/x86_64-pc-linux-gnu-library/4.4/INLA/bin/linux/64bit/external/rSPDE/librSPDE.so"
## .. ..$ n : int 7169
## .. ..$ debug: logi FALSE
## .. ..$ data :List of 5
## .. .. ..$ ints :List of 5
## .. .. .. ..$ n : int 7169
## .. .. .. ..$ debug : int 0
## .. .. .. ..$ graph_opt_i: int [1:16024] 0 0 0 1 1 1 1 1 1 2 ...
## .. .. .. ..$ graph_opt_j: int [1:16024] 0 1 985 1 1700 5207 5364 6858 7041 2 ...
## .. .. .. ..$ alpha : int 1
## .. .. ..$ doubles :List of 2
## .. .. .. ..$ start.theta : num [1:4] -0.3344 -0.0286 0 0
## .. .. .. ..$ theta.prior.mean: num [1:4] -0.3344 -0.0286 0 0
## .. .. ..$ characters:List of 3
## .. .. .. ..$ model : chr "inla_cgeneric_rspde_nonstat_int_model"
## .. .. .. ..$ shlib : chr "/home/rierasl/R/x86_64-pc-linux-gnu-library/4.4/INLA/bin/linux/64bit/external/rSPDE/librSPDE.so"
## .. .. .. ..$ prior.theta.param: chr "theta"
## .. .. ..$ matrices :List of 3
## .. .. .. ..$ B_tau : num [1:35847] 7169 5 -0.693 -1 0.5 ...
## .. .. .. ..$ B_kappa : num [1:35847] 7169 5 0.693 0 -1 ...
## .. .. .. ..$ theta.prior.prec: num [1:18] 4 4 0.1 0 0 0 0 0.1 0 0 ...
## .. .. ..$ smatrices :List of 2
## .. .. .. ..$ C: num [1:21510] 7169 7169 7169 0 1 ...
## .. .. .. ..$ G: num [1:74640] 7169 7169 24879 0 1 ...
## .. ..- attr(*, "class")= chr "inla.cgeneric"
## $ cgeneric_type : chr "int_alpha"
## $ nu : num 0.5
## $ theta.prior.mean : num [1:4] -0.3344 -0.0286 0 0
## $ prior.nu :List of 4
## ..$ loglocation: num -5e-06
## ..$ mean : num 1
## ..$ prec : num 3
## ..$ logscale : num 1
## $ theta.prior.prec : num [1:4, 1:4] 0.1 0 0 0 0 0.1 0 0 0 0 ...
## $ start.nu : num 0.5
## $ integer.nu : logi TRUE
## $ start.theta : num [1:4] -0.3344 -0.0286 0 0
## $ stationary : logi FALSE
## $ rspde.order : num 2
## $ dim : num 1
## $ est_nu : logi FALSE
## $ nu.upper.bound : num 2
## $ prior.nu.dist : chr "lognormal"
## $ debug : logi FALSE
## $ type.rational.approx: chr "chebfun"
## $ mesh :Classes 'metric_graph', 'R6' <metric_graph>
## Public:
## add_mesh_observations: function (data = NULL, group = NULL)
## add_observations: function (data = NULL, edge_number = "edge_number", distance_on_edge = "distance_on_edge",
## build_mesh: function (h = NULL, n = NULL, continuous = TRUE, continuous.outs = FALSE,
## buildC: function (alpha = 2, edge_constraint = FALSE)
## buildDirectionalConstraints: function (alpha = 1)
## C: NULL
## characteristics: list
## check_distance_consistency: function ()
## check_euclidean: function ()
## clear_observations: function ()
## clone: function (deep = FALSE)
## CoB: NULL
## compute_characteristics: function (check_euclidean = FALSE)
## compute_fem: function (petrov = FALSE)
## compute_geodist: function (full = FALSE, obs = TRUE, group = NULL, verbose = 0)
## compute_geodist_mesh: function ()
## compute_geodist_PtE: function (PtE, normalized = TRUE, include_vertices = TRUE, verbose = 0)
## compute_laplacian: function (full = FALSE, obs = TRUE, group = NULL, verbose = 0)
## compute_PtE_edges: function ()
## compute_resdist: function (full = FALSE, obs = TRUE, group = NULL, check_euclidean = FALSE,
## compute_resdist_mesh: function ()
## compute_resdist_PtE: function (PtE, normalized = TRUE, include_vertices = FALSE, check_euclidean = FALSE,
## coordinates: function (PtE = NULL, XY = NULL, normalized = TRUE)
## drop_na: function (...)
## E: 1 3 3 6 4 7 9 11 13 14 15 16 18 19 20 21 23 25 27 29 31 ...
## edge_lengths: 0.0363234139144278 0.01586106867077 0.027923568765887 0. ...
## edges: metric_graph_edges
## edgeweight_to_data: function (loc = NULL, mesh = FALSE, data_loc = FALSE, weight_col = NULL,
## fem_basis: function (PtE)
## filter: function (..., .drop_na = FALSE, .drop_all_na = TRUE)
## geo_dist: list
## get_data: function (group = NULL, tibble = TRUE, drop_na = FALSE, drop_all_na = TRUE)
## get_degrees: function (which = "degree")
## get_edge_lengths: function (unit = NULL)
## get_edge_weights: function (data.frame = FALSE, tibble = TRUE)
## get_groups: function (get_cols = FALSE)
## get_initial_graph: function ()
## get_locations: function ()
## get_mesh_locations: function (bru = FALSE, loc = NULL, normalized = TRUE)
## get_PtE: function ()
## get_vertices_incomp_dir: function ()
## initialize: function (edges = NULL, V = NULL, E = NULL, vertex_unit = NULL,
## is_tree: function ()
## Laplacian: NULL
## mesh: list
## mesh_A: function (PtE)
## mutate: function (..., .drop_na = FALSE, .drop_all_na = TRUE)
## nE: 6827
## nV: 4017
## observation_to_vertex: function (tolerance = 1e-15, mesh_warning = TRUE)
## plot: function (data = NULL, newdata = NULL, group = 1, plotly = FALSE,
## plot_connections: function ()
## plot_function: function (data = NULL, newdata = NULL, group = 1, X = NULL, plotly = FALSE,
## plot_movie: function (X, plotly = TRUE, vertex_size = 5, vertex_color = "black",
## print: function ()
## process_data: function (data = NULL, edge_number = "edge_number", distance_on_edge = "distance_on_edge",
## prune_vertices: function (check_weights = TRUE, verbose = FALSE)
## PtV: NULL
## res_dist: NULL
## select: function (..., .drop_na = FALSE, .drop_all_na = TRUE)
## set_edge_weights: function (weights = rep(1, self$nE), kirchhoff_weights = NULL)
## summarise: function (..., .include_graph_groups = FALSE, .groups = NULL,
## summary: function (messages = FALSE, compute_characteristics = TRUE, check_euclidean = TRUE,
## V: -122.41277 -122.41249 -122.40376 -122.40358 -122.40379 - ...
## vertices: metric_graph_vertices
## VtEfirst: function ()
## Private:
## A: function (group = NULL, obs_to_vert = FALSE, drop_na = FALSE,
## add_vertices: function (PtE, tolerance = 1e-10, verbose)
## addinfo: FALSE
## clear_initial_info: function ()
## compute_degrees: function ()
## compute_laplacian_PtE: function (PtE, normalized = TRUE, verbose = verbose)
## compute_lengths: function (longlat, unit, crs, proj4string, which_longlat, vertex_unit,
## connected: TRUE
## coordinates_multiple_snaps: function (XY, tolerance, verbose = verbose, crs, proj4string,
## create_update_vertices: function ()
## crs: crs
## data: metric_graph_data, list
## edge_weights: tbl_df, tbl, data.frame
## find_edge_edge_points: function (tol, verbose, crs, proj4string, longlat, fact, which_longlat)
## find_mesh_bc: function ()
## get_edge_weights_internal: function (data.frame = FALSE)
## group_col: .group
## initial_edges_added: NULL
## initial_graph: metric_graph, R6
## kirchhoff_weights: NULL
## length_unit: km
## line_to_vertex: function (tolerance = 0, longlat = FALSE, fact, verbose, crs,
## longlat: TRUE
## merge_close_vertices: function (tolerance, fact)
## merge.all.deg2: function ()
## mesh_merge_deg2: function ()
## mesh_merge_outs: function ()
## move_V_first: function ()
## plot_2d: function (line_width = 0.1, marker_size = 1, vertex_color = "black",
## plot_3d: function (line_width = 1, marker_size = 1, vertex_color = "rgb(0,0,0)",
## proj4string: NULL
## prune_warning: FALSE
## pruned: FALSE
## PtE_to_mesh: function (PtE)
## ref_edges: 1 1552 2 5 3133 4 6 395 7 526 8 6466 9 10 11 12 38 13 14 ...
## remove_circles: function (threshold, verbose, longlat, unit, crs, proj4string,
## remove.first.deg2: function (res)
## set_first_weights: function (weights = rep(1, self$nE))
## set_petrov_matrices: function ()
## split_edge: function (Ei, t, tolerance = 0)
## temp_PtE: NULL
## tolerance: list
## transform: FALSE
## vertex_unit: degrees
## which_longlat: sf
## $ fem_mesh :List of 4
## ..$ c0:Formal class 'dgTMatrix' [package "Matrix"] with 6 slots
## .. .. ..@ i : int [1:7169] 0 1 2 3 4 5 6 7 8 9 ...
## .. .. ..@ j : int [1:7169] 0 1 2 3 4 5 6 7 8 9 ...
## .. .. ..@ Dim : int [1:2] 7169 7169
## .. .. ..@ Dimnames:List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : NULL
## .. .. ..@ x : num [1:7169] 0.0797 0.1564 0.1117 0.0493 0.0614 ...
## .. .. ..@ factors : list()
## ..$ g1:Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. ..@ i : int [1:24879] 0 1 985 0 1 1700 5207 5364 6858 7041 ...
## .. .. ..@ p : int [1:7170] 0 3 10 16 20 23 27 36 44 50 ...
## .. .. ..@ Dim : int [1:2] 7169 7169
## .. .. ..@ Dimnames:List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : NULL
## .. .. ..@ x : num [1:24879] 101.1 -55.1 -46.1 -55.1 216.4 ...
## .. .. ..@ factors : list()
## ..$ g2:Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. ..@ i : int [1:56007] 0 1 985 986 1700 4722 5207 5364 6240 6858 ...
## .. .. ..@ p : int [1:7170] 0 11 22 34 43 52 61 76 89 99 ...
## .. .. ..@ Dim : int [1:2] 7169 7169
## .. .. ..@ Dimnames:List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : NULL
## .. .. ..@ x : num [1:56007] 172097 -145986 -232979 119006 15770 ...
## .. .. ..@ factors : list()
## ..$ g3:Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. ..@ i : int [1:96755] 0 1 230 984 985 986 1700 1701 2280 2455 ...
## .. .. ..@ p : int [1:7170] 0 17 35 57 76 91 103 126 150 166 ...
## .. .. ..@ Dim : int [1:2] 7169 7169
## .. .. ..@ Dimnames:List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : NULL
## .. .. ..@ x : num [1:96755] 3.94e+08 -3.74e+08 -2.65e+07 -9.14e+07 -1.47e+09 ...
## .. .. ..@ factors : list()
## $ parameterization : chr "matern"
## $ n.spde : int 7169
## - attr(*, "class")= chr [1:3] "rspde_metric_graph" "inla_rspde" "inla.cgeneric"data_rspde_bru_nonstat <- graph_data_rspde(rspde_model_nonstat,
repl = ".all",
loc_name = "loc")str(data_rspde_bru_nonstat)
## List of 4
## $ data :List of 9
## ..$ speed : num [1:14535] 0 12 24 32 0 19 22 19 30 14 ...
## ..$ SpeedLimit : num [1:14535] -0.101 -0.617 -0.617 -0.617 -0.927 ...
## ..$ E : num [1:14535] 1 1 1 1 1 1 1 1 1 1 ...
## ..$ .coord_x : num [1:14535] -122 -122 -122 -122 -122 ...
## ..$ .coord_y : num [1:14535] 37.8 37.8 37.8 37.8 37.8 ...
## ..$ .edge_number : num [1:14535] 1 4 6 6 9 14 14 14 18 20 ...
## ..$ .distance_on_edge: num [1:14535] 0.437 0.144 0.252 0.658 0.601 ...
## ..$ .group : chr [1:14535] "1" "1" "1" "1" ...
## ..$ loc : num [1:14535, 1:2] 1 4 6 6 9 14 14 14 18 20 ...
## ..- attr(*, "class")= chr [1:2] "metric_graph_data" "list"
## $ index:List of 3
## ..$ field : int [1:28676] 1 2 3 4 5 6 7 8 9 10 ...
## ..$ field.group: int [1:28676] 1 1 1 1 1 1 1 1 1 1 ...
## ..$ field.repl : int [1:28676] 1 1 1 1 1 1 1 1 1 1 ...
## ..- attr(*, "class")= chr [1:2] "inla_rspde_index" "list"
## ..- attr(*, "rspde.order")= num 0
## ..- attr(*, "integer_nu")= logi TRUE
## ..- attr(*, "n.mesh")= int 7169
## ..- attr(*, "name")= chr "field"
## ..- attr(*, "n.group")= int 1
## ..- attr(*, "n.repl")= int 4
## $ repl : chr [1:14535] "1" "1" "1" "1" ...
## $ basis:Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. ..@ i : int [1:29070] 0 555 1905 1906 0 1050 1471 1472 1473 1905 ...
## .. ..@ p : int [1:28677] 0 4 11 11 11 11 12 13 15 15 ...
## .. ..@ Dim : int [1:2] 14535 28676
## .. ..@ Dimnames:List of 2
## .. .. ..$ : NULL
## .. .. ..$ : NULL
## .. ..@ x : num [1:29070] 0.563 0.0495 0.3595 0.7935 0.437 ...
## .. ..@ factors : list()cmp_nonstat = speed ~ -1 +
Intercept(1) +
SpeedLimit +
field(loc, model = rspde_model_nonstat,
replicate = data_rspde_bru_nonstat[["repl"]])
rspde_fit_nonstat <-
bru(cmp_nonstat,
data = data_rspde_bru_nonstat[["data"]],
family = "nbinomial",
options = list(verbose = FALSE)
)str(rspde_fit_nonstat)
## List of 56
## $ names.fixed : chr [1:2] "Intercept" "SpeedLimit"
## $ summary.fixed :'data.frame': 2 obs. of 7 variables:
## ..$ mean : num [1:2] 2.926 0.118
## ..$ sd : num [1:2] 0.0226 0.0107
## ..$ 0.025quant: num [1:2] 2.8821 0.0966
## ..$ 0.5quant : num [1:2] 2.926 0.117
## ..$ 0.975quant: num [1:2] 2.971 0.139
## ..$ mode : num [1:2] 2.926 0.117
## ..$ kld : num [1:2] 2.40e-07 2.51e-08
## $ marginals.fixed :List of 2
## ..$ Intercept : num [1:43, 1:2] 2.82 2.84 2.86 2.87 2.88 ...
## .. ..- attr(*, "dimnames")=List of 2
## .. .. ..$ : NULL
## .. .. ..$ : chr [1:2] "x" "y"
## ..$ SpeedLimit: num [1:43, 1:2] 0.0714 0.0774 0.0844 0.0927 0.0966 ...
## .. ..- attr(*, "dimnames")=List of 2
## .. .. ..$ : NULL
## .. .. ..$ : chr [1:2] "x" "y"
## $ summary.lincomb :'data.frame': 0 obs. of 0 variables
## $ marginals.lincomb : NULL
## $ size.lincomb : NULL
## $ summary.lincomb.derived :'data.frame': 0 obs. of 0 variables
## $ marginals.lincomb.derived : NULL
## $ size.lincomb.derived : NULL
## $ mlik : num [1:2, 1] -56732 -56728
## ..- attr(*, "dimnames")=List of 2
## .. ..$ : chr [1:2] "log marginal-likelihood (integration)" "log marginal-likelihood (Gaussian)"
## .. ..$ : NULL
## $ cpo :List of 3
## ..$ cpo : logi(0)
## ..$ pit : logi(0)
## ..$ failure: logi(0)
## $ gcpo :List of 5
## ..$ gcpo : NULL
## ..$ kld : NULL
## ..$ mean : NULL
## ..$ sd : NULL
## ..$ groups: NULL
## $ po :List of 1
## ..$ po: num [1:14535] 0.0143 0.035 0.0182 0.0116 0.0193 ...
## $ waic :List of 4
## ..$ waic : num 112650
## ..$ p.eff : num 534
## ..$ local.waic : num [1:14535] 8.62 6.73 8.06 9.1 8.2 ...
## ..$ local.p.eff: num [1:14535] 0.0617 0.0128 0.0199 0.0959 0.1525 ...
## $ residuals :List of 1
## ..$ deviance.residuals: num [1:14535] -2.925 -0.465 0.459 0.778 -2.837 ...
## $ model.random : chr "CGeneric"
## $ summary.random :List of 1
## ..$ field:'data.frame': 28676 obs. of 8 variables:
## .. ..$ ID : num [1:28676] 1 2 3 4 5 6 7 8 9 10 ...
## .. ..$ mean : num [1:28676] 0.0617 0.0038 0.0012 0.0084 0.0124 ...
## .. ..$ sd : num [1:28676] 0.188 0.16 0.203 0.216 0.23 ...
## .. ..$ 0.025quant: num [1:28676] -0.307 -0.311 -0.398 -0.415 -0.44 ...
## .. ..$ 0.5quant : num [1:28676] 0.06173 0.00386 0.00133 0.00853 0.01253 ...
## .. ..$ 0.975quant: num [1:28676] 0.431 0.318 0.399 0.431 0.464 ...
## .. ..$ mode : num [1:28676] 0.06173 0.00386 0.00133 0.00853 0.01253 ...
## .. ..$ kld : num [1:28676] 1.52e-10 1.73e-10 5.59e-10 5.74e-10 7.41e-10 ...
## $ marginals.random :List of 1
## ..$ field:List of 28676
## .. ..$ index.1 : num [1:43, 1:2] -0.746 -0.642 -0.522 -0.377 -0.307 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.2 : num [1:43, 1:2] -0.685 -0.596 -0.494 -0.37 -0.311 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.3 : num [1:43, 1:2] -0.876 -0.762 -0.631 -0.473 -0.398 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.4 : num [1:43, 1:2] -0.923 -0.802 -0.663 -0.495 -0.415 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.5 : num [1:43, 1:2] -0.983 -0.854 -0.705 -0.525 -0.44 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.6 : num [1:43, 1:2] -1.145 -1.004 -0.841 -0.645 -0.552 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.7 : num [1:43, 1:2] -0.84 -0.726 -0.596 -0.438 -0.362 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.8 : num [1:43, 1:2] -0.747 -0.641 -0.518 -0.37 -0.299 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.9 : num [1:43, 1:2] -1.106 -0.961 -0.795 -0.594 -0.499 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.10 : num [1:43, 1:2] -1.107 -0.956 -0.782 -0.572 -0.472 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.11 : num [1:43, 1:2] -1.134 -0.979 -0.801 -0.587 -0.485 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.12 : num [1:43, 1:2] -1.248 -1.078 -0.881 -0.646 -0.533 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.13 : num [1:43, 1:2] -0.951 -0.828 -0.687 -0.516 -0.434 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.14 : num [1:43, 1:2] -1.016 -0.885 -0.734 -0.552 -0.466 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.15 : num [1:43, 1:2] -0.865 -0.749 -0.615 -0.454 -0.378 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.16 : num [1:43, 1:2] -0.85 -0.733 -0.598 -0.436 -0.359 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.17 : num [1:43, 1:2] -0.647 -0.554 -0.447 -0.318 -0.256 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.18 : num [1:43, 1:2] -0.971 -0.843 -0.695 -0.517 -0.432 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.19 : num [1:43, 1:2] -0.963 -0.836 -0.689 -0.512 -0.428 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.20 : num [1:43, 1:2] -1.116 -0.963 -0.787 -0.576 -0.475 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.21 : num [1:43, 1:2] -1.32 -1.14 -0.933 -0.684 -0.566 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.22 : num [1:43, 1:2] -1.144 -0.987 -0.806 -0.589 -0.486 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.23 : num [1:43, 1:2] -1.306 -1.139 -0.948 -0.718 -0.609 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.24 : num [1:43, 1:2] -1.29 -1.123 -0.932 -0.701 -0.592 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.25 : num [1:43, 1:2] -0.938 -0.795 -0.631 -0.433 -0.338 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.26 : num [1:43, 1:2] -0.674 -0.565 -0.44 -0.287 -0.215 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.27 : num [1:43, 1:2] -1.281 -1.122 -0.941 -0.723 -0.62 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.28 : num [1:43, 1:2] -1.154 -1.009 -0.843 -0.643 -0.548 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.29 : num [1:43, 1:2] -1.116 -0.986 -0.837 -0.657 -0.57 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.30 : num [1:43, 1:2] -0.733 -0.619 -0.487 -0.328 -0.251 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.31 : num [1:43, 1:2] -1.242 -1.097 -0.93 -0.729 -0.633 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.32 : num [1:43, 1:2] -1.248 -1.096 -0.921 -0.711 -0.61 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.33 : num [1:43, 1:2] -1.33 -1.17 -0.985 -0.764 -0.658 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.34 : num [1:43, 1:2] -1.029 -0.913 -0.78 -0.62 -0.543 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.35 : num [1:43, 1:2] -1.419 -1.23 -1.013 -0.752 -0.628 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.36 : num [1:43, 1:2] -1.139 -0.983 -0.805 -0.59 -0.489 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.37 : num [1:43, 1:2] -1.445 -1.253 -1.033 -0.77 -0.644 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.38 : num [1:43, 1:2] -1.443 -1.253 -1.034 -0.772 -0.647 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.39 : num [1:43, 1:2] -1.383 -1.203 -0.998 -0.75 -0.633 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.40 : num [1:43, 1:2] -1.23 -1.07 -0.888 -0.668 -0.564 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.41 : num [1:43, 1:2] -1.323 -1.154 -0.959 -0.725 -0.614 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.42 : num [1:43, 1:2] -1.216 -1.056 -0.873 -0.653 -0.549 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.43 : num [1:43, 1:2] -1.495 -1.308 -1.093 -0.836 -0.715 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.44 : num [1:43, 1:2] -1.211 -1.052 -0.87 -0.652 -0.549 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.45 : num [1:43, 1:2] -1.207 -1.063 -0.898 -0.701 -0.608 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.46 : num [1:43, 1:2] -1.27 -1.133 -0.975 -0.786 -0.695 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.47 : num [1:43, 1:2] -1.12 -0.995 -0.851 -0.678 -0.596 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.48 : num [1:43, 1:2] -0.829 -0.713 -0.58 -0.42 -0.343 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.49 : num [1:43, 1:2] -0.921 -0.796 -0.652 -0.477 -0.393 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.50 : num [1:43, 1:2] -0.804 -0.694 -0.568 -0.416 -0.344 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.51 : num [1:43, 1:2] -0.684 -0.597 -0.497 -0.375 -0.317 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.52 : num [1:43, 1:2] -1.149 -1.029 -0.89 -0.723 -0.643 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.53 : num [1:43, 1:2] -0.956 -0.854 -0.738 -0.597 -0.53 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.54 : num [1:43, 1:2] -1.188 -1.051 -0.894 -0.707 -0.617 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.55 : num [1:43, 1:2] -1.296 -1.143 -0.967 -0.756 -0.656 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.56 : num [1:43, 1:2] -1.303 -1.161 -0.998 -0.803 -0.711 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.57 : num [1:43, 1:2] -1.435 -1.275 -1.093 -0.875 -0.772 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.58 : num [1:43, 1:2] -1.213 -1.073 -0.913 -0.72 -0.629 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.59 : num [1:43, 1:2] -1.011 -0.889 -0.749 -0.582 -0.502 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.60 : num [1:43, 1:2] -1.222 -1.083 -0.924 -0.734 -0.644 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.61 : num [1:43, 1:2] -1.061 -0.93 -0.78 -0.599 -0.513 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.62 : num [1:43, 1:2] -0.905 -0.792 -0.662 -0.506 -0.431 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.63 : num [1:43, 1:2] -1.127 -0.995 -0.843 -0.661 -0.575 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.64 : num [1:43, 1:2] -1.081 -0.939 -0.775 -0.579 -0.485 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.65 : num [1:43, 1:2] -1.028 -0.893 -0.738 -0.551 -0.462 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.66 : num [1:43, 1:2] -0.846 -0.719 -0.573 -0.398 -0.314 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.67 : num [1:43, 1:2] -0.512 -0.418 -0.31 -0.18 -0.117 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.68 : num [1:43, 1:2] -0.891 -0.778 -0.648 -0.492 -0.417 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.69 : num [1:43, 1:2] -1.026 -0.895 -0.743 -0.56 -0.473 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.70 : num [1:43, 1:2] -0.893 -0.774 -0.637 -0.472 -0.393 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.71 : num [1:43, 1:2] -0.78 -0.688 -0.582 -0.454 -0.392 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.72 : num [1:43, 1:2] -0.668 -0.584 -0.487 -0.37 -0.315 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.73 : num [1:43, 1:2] -0.871 -0.72 -0.547 -0.34 -0.241 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.74 : num [1:43, 1:2] -0.34046 -0.2587 -0.16408 -0.04918 0.00595 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.75 : num [1:43, 1:2] -1.42 -1.265 -1.085 -0.867 -0.763 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.76 : num [1:43, 1:2] -1.587 -1.412 -1.211 -0.969 -0.854 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.77 : num [1:43, 1:2] -1.25 -1.103 -0.933 -0.729 -0.632 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.78 : num [1:43, 1:2] -0.916 -0.814 -0.696 -0.554 -0.486 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.79 : num [1:43, 1:2] -1.018 -0.918 -0.803 -0.663 -0.597 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.80 : num [1:43, 1:2] -0.792 -0.693 -0.579 -0.442 -0.377 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.81 : num [1:43, 1:2] -0.88 -0.791 -0.689 -0.565 -0.506 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.82 : num [1:43, 1:2] -0.811 -0.703 -0.578 -0.427 -0.356 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.83 : num [1:43, 1:2] -1.104 -0.986 -0.85 -0.688 -0.61 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.84 : num [1:43, 1:2] -1.07 -0.944 -0.799 -0.626 -0.544 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.85 : num [1:43, 1:2] -1.094 -0.963 -0.813 -0.633 -0.547 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.86 : num [1:43, 1:2] -1.048 -0.923 -0.779 -0.607 -0.526 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.87 : num [1:43, 1:2] -1.153 -1.015 -0.856 -0.666 -0.575 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.88 : num [1:43, 1:2] -0.911 -0.805 -0.684 -0.537 -0.466 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.89 : num [1:43, 1:2] -1.244 -1.099 -0.933 -0.732 -0.636 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.90 : num [1:43, 1:2] -0.956 -0.851 -0.731 -0.586 -0.517 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.91 : num [1:43, 1:2] -1.025 -0.911 -0.779 -0.621 -0.546 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.92 : num [1:43, 1:2] -0.949 -0.837 -0.709 -0.556 -0.482 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.93 : num [1:43, 1:2] -1.144 -1.009 -0.854 -0.668 -0.58 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.94 : num [1:43, 1:2] -1.159 -0.993 -0.803 -0.575 -0.466 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.95 : num [1:43, 1:2] -1.053 -0.917 -0.761 -0.575 -0.486 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.96 : num [1:43, 1:2] -1.12 -0.952 -0.758 -0.525 -0.414 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.97 : num [1:43, 1:2] -0.788 -0.656 -0.506 -0.325 -0.238 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.98 : num [1:43, 1:2] -1.12 -0.993 -0.846 -0.671 -0.587 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. ..$ index.99 : num [1:43, 1:2] -1.124 -0.997 -0.851 -0.677 -0.594 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : NULL
## .. .. .. ..$ : chr [1:2] "x" "y"
## .. .. [list output truncated]
## $ size.random :List of 1
## ..$ :List of 5
## .. ..$ n : num 7169
## .. ..$ N : num 7169
## .. ..$ Ntotal: num 28676
## .. ..$ ngroup: num 1
## .. ..$ nrep : num 4
## $ summary.linear.predictor :'data.frame': 43213 obs. of 7 variables:
## ..$ mean : num [1:43213] 2.95 2.81 2.94 2.99 2.79 ...
## ..$ sd : num [1:43213] 0.156 0.252 0.244 0.272 0.252 ...
## ..$ 0.025quant: num [1:43213] 2.64 2.31 2.47 2.46 2.29 ...
## ..$ 0.5quant : num [1:43213] 2.95 2.81 2.94 2.99 2.79 ...
## ..$ 0.975quant: num [1:43213] 3.26 3.3 3.42 3.52 3.28 ...
## ..$ mode : num [1:43213] 2.95 2.81 2.94 2.99 2.79 ...
## ..$ kld : num [1:43213] 9.55e-11 3.35e-10 5.83e-11 6.00e-11 3.17e-10 ...
## $ marginals.linear.predictor : NULL
## $ summary.fitted.values :'data.frame': 43213 obs. of 6 variables:
## ..$ mean : num [1:43213] 19.3 17.1 19.5 20.7 16.7 ...
## ..$ sd : num [1:43213] 3.03 4.36 4.83 5.72 4.28 ...
## ..$ 0.025quant: num [1:43213] 14.08 10.09 11.76 11.69 9.89 ...
## ..$ 0.5quant : num [1:43213] 19.1 16.5 19 19.9 16.2 ...
## ..$ 0.975quant: num [1:43213] 25.9 27.1 30.6 33.9 26.6 ...
## ..$ mode : num [1:43213] 18.7 15.5 17.9 18.5 15.2 ...
## $ marginals.fitted.values : NULL
## $ size.linear.predictor :List of 5
## ..$ n : num 28678
## ..$ N : num 28678
## ..$ Ntotal: num 43213
## ..$ ngroup: num 1
## ..$ nrep : num 2
## $ summary.hyperpar :'data.frame': 5 obs. of 6 variables:
## ..$ mean : num [1:5] 1.709 -0.378 -0.122 0.377 0.585
## ..$ sd : num [1:5] 0.0277 0.1025 0.2694 0.3974 0.8309
## ..$ 0.025quant: num [1:5] 1.655 -0.587 -0.666 -0.24 -0.702
## ..$ 0.5quant : num [1:5] 1.709 -0.376 -0.118 0.329 0.486
## ..$ 0.975quant: num [1:5] 1.764 -0.184 0.395 1.284 2.483
## ..$ mode : num [1:5] 1.708161 -0.364182 -0.097489 0.099007 -0.000273
## $ marginals.hyperpar :List of 5
## ..$ size for the nbinomial observations (1/overdispersion): num [1:43, 1:2] 1.59 1.61 1.63 1.65 1.66 ...
## .. ..- attr(*, "hyperid")= chr "63001|INLA.Data1"
## .. ..- attr(*, "dimnames")=List of 2
## .. .. ..$ : NULL
## .. .. ..$ : chr [1:2] "x" "y"
## ..$ Theta1 for field : num [1:43, 1:2] -0.844 -0.783 -0.713 -0.628 -0.587 ...
## .. ..- attr(*, "hyperid")= chr ""
## .. ..- attr(*, "dimnames")=List of 2
## .. .. ..$ : NULL
## .. .. ..$ : chr [1:2] "x" "y"
## ..$ Theta2 for field : num [1:43, 1:2] -1.326 -1.169 -0.989 -0.771 -0.666 ...
## .. ..- attr(*, "hyperid")= chr ""
## .. ..- attr(*, "dimnames")=List of 2
## .. .. ..$ : NULL
## .. .. ..$ : chr [1:2] "x" "y"
## ..$ Theta3 for field : num [1:43, 1:2] -0.717 -0.607 -0.48 -0.317 -0.24 ...
## .. ..- attr(*, "hyperid")= chr ""
## .. ..- attr(*, "dimnames")=List of 2
## .. .. ..$ : NULL
## .. .. ..$ : chr [1:2] "x" "y"
## ..$ Theta4 for field : num [1:43, 1:2] -1.693 -1.464 -1.2 -0.863 -0.702 ...
## .. ..- attr(*, "hyperid")= chr ""
## .. ..- attr(*, "dimnames")=List of 2
## .. .. ..$ : NULL
## .. .. ..$ : chr [1:2] "x" "y"
## $ internal.summary.hyperpar :'data.frame': 5 obs. of 6 variables:
## ..$ mean : num [1:5] 0.536 -0.379 -0.123 0.385 0.602
## ..$ sd : num [1:5] 0.0162 0.1024 0.2694 0.3963 0.8287
## ..$ 0.025quant: num [1:5] 0.504 -0.587 -0.666 -0.24 -0.702
## ..$ 0.5quant : num [1:5] 0.536 -0.376 -0.118 0.329 0.486
## ..$ 0.975quant: num [1:5] 0.568 -0.184 0.395 1.284 2.483
## ..$ mode : num [1:5] 0.5357 -0.365 -0.0989 0.1065 0.0167
## $ internal.marginals.hyperpar:List of 5
## ..$ log size for the nbinomial observations (1/overdispersion): num [1:43, 1:2] 0.467 0.475 0.486 0.498 0.504 ...
## .. ..- attr(*, "hyperid")= chr "63001|INLA.Data1"
## .. ..- attr(*, "dimnames")=List of 2
## .. .. ..$ : NULL
## .. .. ..$ : chr [1:2] "x" "y"
## ..$ Theta1 for field : num [1:43, 1:2] -0.844 -0.783 -0.713 -0.628 -0.587 ...
## .. ..- attr(*, "hyperid")= chr ""
## .. ..- attr(*, "dimnames")=List of 2
## .. .. ..$ : NULL
## .. .. ..$ : chr [1:2] "x" "y"
## ..$ Theta2 for field : num [1:43, 1:2] -1.326 -1.169 -0.989 -0.771 -0.666 ...
## .. ..- attr(*, "hyperid")= chr ""
## .. ..- attr(*, "dimnames")=List of 2
## .. .. ..$ : NULL
## .. .. ..$ : chr [1:2] "x" "y"
## ..$ Theta3 for field : num [1:43, 1:2] -0.717 -0.607 -0.48 -0.317 -0.24 ...
## .. ..- attr(*, "hyperid")= chr ""
## .. ..- attr(*, "dimnames")=List of 2
## .. .. ..$ : NULL
## .. .. ..$ : chr [1:2] "x" "y"
## ..$ Theta4 for field : num [1:43, 1:2] -1.693 -1.464 -1.2 -0.863 -0.702 ...
## .. ..- attr(*, "hyperid")= chr ""
## .. ..- attr(*, "dimnames")=List of 2
## .. .. ..$ : NULL
## .. .. ..$ : chr [1:2] "x" "y"
## $ offset.linear.predictor : num [1:43213] 0 0 0 0 0 0 0 0 0 0 ...
## $ model.spde2.blc : NULL
## $ summary.spde2.blc : list()
## $ marginals.spde2.blc : NULL
## $ size.spde2.blc : NULL
## $ model.spde3.blc : NULL
## $ summary.spde3.blc : list()
## $ marginals.spde3.blc : NULL
## $ size.spde3.blc : NULL
## $ logfile : chr [1:4060] "[PANUA] PARDISO License is expired." "[PANUA] Please obtain a new PARDISO license at https://www.panua.ch/products/pardiso" " Read ntt 24 1 with max.threads 24" " Found num.threads = 24:1 max_threads = 24" ...
## $ misc :List of 22
## ..$ cov.intern : num [1:5, 1:5] 0.000263 -0.000134 -0.00096 0.000182 0.000419 ...
## ..$ cor.intern : num [1:5, 1:5] 1 -0.0754 -0.2055 0.0341 0.0377 ...
## ..$ cov.intern.eigenvalues : num [1:5] 0.000223 0.000718 0.001548 0.074827 0.596144
## ..$ cov.intern.eigenvectors : num [1:5, 1:5] 0.98822 -0.1396 0.06024 -0.01585 0.00703 ...
## ..$ reordering : int [1:28678] 8868 9169 9763 9745 9727 9756 9766 9755 9730 10129 ...
## ..$ theta.tags : chr [1:5] "log size for the nbinomial observations (1/overdispersion)" "Theta1 for field" "Theta2 for field" "Theta3 for field" ...
## ..$ log.posterior.mode : num -56720
## ..$ stdev.corr.negative : num [1:5] 0.996 0.967 0.989 0.909 0.578
## ..$ stdev.corr.positive : num [1:5] 1 1.03 1.01 1.1 1.73
## ..$ to.theta :List of 5
## .. ..$ log size for the nbinomial observations (1/overdispersion):function (x)
## .. ..$ Theta1 for field :function (x)
## .. ..$ Theta2 for field :function (x)
## .. ..$ Theta3 for field :function (x)
## .. ..$ Theta4 for field :function (x)
## ..$ from.theta :List of 5
## .. ..$ log size for the nbinomial observations (1/overdispersion):function (x)
## .. ..$ Theta1 for field :function (x)
## .. ..$ Theta2 for field :function (x)
## .. ..$ Theta3 for field :function (x)
## .. ..$ Theta4 for field :function (x)
## ..$ mode.status : num 0
## ..$ lincomb.derived.correlation.matrix: NULL
## ..$ lincomb.derived.covariance.matrix : NULL
## ..$ opt.directions : num [1:5, 1:5] -0.0361 0.3852 0.9053 0.1723 -0.0333 ...
## .. ..- attr(*, "dimnames")=List of 2
## .. .. ..$ : chr [1:5] "theta:1" "theta:2" "theta:3" "theta:4" ...
## .. .. ..$ : chr [1:5] "dir:1" "dir:2" "dir:3" "dir:4" ...
## ..$ configs :List of 17
## .. ..$ .preopt : logi TRUE
## .. ..$ lite : logi FALSE
## .. ..$ mpred : int 14535
## .. ..$ npred : int 28678
## .. ..$ mnpred : int 43213
## .. ..$ Npred : int 14535
## .. ..$ n : int 28678
## .. ..$ nz : int 80857
## .. ..$ prior_nz : int 64098
## .. ..$ ntheta : int 5
## .. ..$ nconfig : int 27
## .. ..$ offsets : num [1:43213] 0 0 0 0 0 0 0 0 0 0 ...
## .. ..$ contents :List of 3
## .. .. ..$ tag : chr [1:5] "APredictor" "Predictor" "field" "Intercept" ...
## .. .. ..$ start : int [1:5] 1 14536 43214 71890 71891
## .. .. ..$ length: int [1:5] 14535 28678 28676 1 1
## .. ..$ A :Formal class 'dgTMatrix' [package "Matrix"] with 6 slots
## .. .. .. ..@ i : int [1:28678] 2 3 4 5 6 7 8 9 10 11 ...
## .. .. .. ..@ j : int [1:28678] 0 1 2 3 4 5 6 7 8 9 ...
## .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. ..$ : NULL
## .. .. .. .. ..$ : NULL
## .. .. .. ..@ x : num [1:28678] 1 1 1 1 1 1 1 1 1 1 ...
## .. .. .. ..@ factors : list()
## .. ..$ pA :Formal class 'dgTMatrix' [package "Matrix"] with 6 slots
## .. .. .. ..@ i : int [1:58126] 0 1 2 3 4 5 6 7 8 9 ...
## .. .. .. ..@ j : int [1:58126] 0 0 0 0 0 0 0 0 0 0 ...
## .. .. .. ..@ Dim : int [1:2] 14535 28678
## .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. ..$ : NULL
## .. .. .. .. ..$ : NULL
## .. .. .. ..@ x : num [1:58126] 1 1 1 1 1 1 1 1 1 1 ...
## .. .. .. ..@ factors : list()
## .. ..$ config :List of 27
## .. .. ..$ :List of 15
## .. .. .. ..$ theta : Named num [1:5] 0.5357 -0.3628 -0.095 0.0775 -0.0439
## .. .. .. .. ..- attr(*, "names")= chr [1:5] "log size for the nbinomial observations (1/overdispersion)" "Theta1 for field" "Theta2 for field" "Theta3 for field" ...
## .. .. .. ..$ log.posterior : num -4.6
## .. .. .. ..$ log.posterior.orig: num 0
## .. .. .. ..$ mean : num [1:28678] 0.07428 0.01501 0.00566 0.01261 0.01721 ...
## .. .. .. ..$ improved.mean : num [1:28678] 5.84e-02 -7.05e-05 -5.12e-03 2.04e-03 6.41e-03 ...
## .. .. .. ..$ skewness : logi [1:28678] NA NA NA NA NA NA ...
## .. .. .. ..$ Q :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:80857] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:80857] 50.5 -27.5 118.9 173.4 -66.5 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ Qinv :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:80857] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:80857] 0.0358 0.0174 0.0259 0.0414 0.0372 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ Qprior :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:64098] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:64098] 49.4 -27.9 114.5 173.4 -66.5 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ cpodens.moments : num[0 , 1:3]
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "mean" "variance" "skewness"
## .. .. .. ..$ gcpodens.moments : num[0 , 1:3]
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "mean" "variance" "log.theta.correction"
## .. .. .. ..$ arg.str : NULL
## .. .. .. ..$ ll.info : num [1:14535, 1:3] -1.568 -0.412 0.43 0.967 -1.545 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "gradient" "hessian" "deriv3"
## .. .. .. ..$ APredictor : num [1:14535, 1:2] 2.95 2.8 2.94 2.99 2.79 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:2] "mean" "variance"
## .. .. .. ..$ Predictor : num [1:28678, 1:2] 2.93 1.18e-01 5.84e-02 -7.05e-05 -5.12e-03 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:2] "mean" "variance"
## .. .. ..$ :List of 15
## .. .. .. ..$ theta : Named num [1:5] 0.5721 -0.368 -0.0928 0.077 -0.0436
## .. .. .. .. ..- attr(*, "names")= chr [1:5] "log size for the nbinomial observations (1/overdispersion)" "Theta1 for field" "Theta2 for field" "Theta3 for field" ...
## .. .. .. ..$ log.posterior : num -6.3
## .. .. .. ..$ log.posterior.orig: num -3.03
## .. .. .. ..$ mean : num [1:28678] 0.07442 0.0145 0.00521 0.01228 0.01693 ...
## .. .. .. ..$ improved.mean : num [1:28678] 0.058892 -0.000241 -0.005381 0.001902 0.00632 ...
## .. .. .. ..$ skewness : logi [1:28678] NA NA NA NA NA NA ...
## .. .. .. ..$ Q :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:80857] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:80857] 51.2 -27.8 120.4 175.4 -67.3 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ Qinv :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:80857] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:80857] 0.0352 0.017 0.0254 0.0409 0.0367 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ Qprior :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:64098] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:64098] 50 -28.2 115.9 175.4 -67.3 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ cpodens.moments : num[0 , 1:3]
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "mean" "variance" "skewness"
## .. .. .. ..$ gcpodens.moments : num[0 , 1:3]
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "mean" "variance" "log.theta.correction"
## .. .. .. ..$ arg.str : NULL
## .. .. .. ..$ ll.info : num [1:14535, 1:3] -1.621 -0.425 0.442 0.995 -1.597 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "gradient" "hessian" "deriv3"
## .. .. .. ..$ APredictor : num [1:14535, 1:2] 2.95 2.8 2.94 2.99 2.78 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:2] "mean" "variance"
## .. .. .. ..$ Predictor : num [1:28678, 1:2] 2.929054 0.117209 0.058892 -0.000241 -0.005381 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:2] "mean" "variance"
## .. .. ..$ :List of 15
## .. .. .. ..$ theta : Named num [1:5] 0.4995 -0.3577 -0.0972 0.0781 -0.0442
## .. .. .. .. ..- attr(*, "names")= chr [1:5] "log size for the nbinomial observations (1/overdispersion)" "Theta1 for field" "Theta2 for field" "Theta3 for field" ...
## .. .. .. ..$ log.posterior : num -6.31
## .. .. .. ..$ log.posterior.orig: num -3.04
## .. .. .. ..$ mean : num [1:28678] 0.07413 0.0155 0.00609 0.01294 0.01748 ...
## .. .. .. ..$ improved.mean : num [1:28678] 5.79e-02 8.55e-05 -4.87e-03 2.18e-03 6.49e-03 ...
## .. .. .. ..$ skewness : logi [1:28678] NA NA NA NA NA NA ...
## .. .. .. ..$ Q :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:80857] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:80857] 49.9 -27.2 117.5 171.4 -65.8 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ Qinv :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:80857] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:80857] 0.0364 0.0177 0.0264 0.042 0.0377 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ Qprior :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:64098] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:64098] 48.8 -27.6 113.2 171.4 -65.8 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ cpodens.moments : num[0 , 1:3]
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "mean" "variance" "skewness"
## .. .. .. ..$ gcpodens.moments : num[0 , 1:3]
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "mean" "variance" "log.theta.correction"
## .. .. .. ..$ arg.str : NULL
## .. .. .. ..$ ll.info : num [1:14535, 1:3] -1.517 -0.4 0.418 0.94 -1.496 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "gradient" "hessian" "deriv3"
## .. .. .. ..$ APredictor : num [1:14535, 1:2] 2.95 2.8 2.94 2.99 2.79 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:2] "mean" "variance"
## .. .. .. ..$ Predictor : num [1:28678, 1:2] 2.93 1.18e-01 5.79e-02 8.55e-05 -4.87e-03 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:2] "mean" "variance"
## .. .. ..$ :List of 15
## .. .. .. ..$ theta : Named num [1:5] 0.5327 -0.374 -0.0909 0.0171 -0.015
## .. .. .. .. ..- attr(*, "names")= chr [1:5] "log size for the nbinomial observations (1/overdispersion)" "Theta1 for field" "Theta2 for field" "Theta3 for field" ...
## .. .. .. ..$ log.posterior : num -5.89
## .. .. .. ..$ log.posterior.orig: num -2.62
## .. .. .. ..$ mean : num [1:28678] 0.07792 0.01949 0.00979 0.01697 0.02142 ...
## .. .. .. ..$ improved.mean : num [1:28678] 0.06106 0.00294 -0.00209 0.00531 0.00951 ...
## .. .. .. ..$ skewness : logi [1:28678] NA NA NA NA NA NA ...
## .. .. .. ..$ Q :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:80857] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:80857] 50.6 -26.7 112.1 163.1 -62.6 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ Qinv :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:80857] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:80857] 0.0356 0.0178 0.0274 0.0441 0.0396 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ Qprior :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:64098] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:64098] 49.4 -27.1 107.8 163.1 -62.6 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ cpodens.moments : num[0 , 1:3]
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "mean" "variance" "skewness"
## .. .. .. ..$ gcpodens.moments : num[0 , 1:3]
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "mean" "variance" "log.theta.correction"
## .. .. .. ..$ arg.str : NULL
## .. .. .. ..$ ll.info : num [1:14535, 1:3] -1.564 -0.409 0.432 0.97 -1.54 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "gradient" "hessian" "deriv3"
## .. .. .. ..$ APredictor : num [1:14535, 1:2] 2.95 2.8 2.94 2.99 2.78 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:2] "mean" "variance"
## .. .. .. ..$ Predictor : num [1:28678, 1:2] 2.92615 0.11986 0.06106 0.00294 -0.00209 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:2] "mean" "variance"
## .. .. ..$ :List of 15
## .. .. .. ..$ theta : Named num [1:5] 0.5385 -0.3524 -0.0988 0.1341 -0.0709
## .. .. .. .. ..- attr(*, "names")= chr [1:5] "log size for the nbinomial observations (1/overdispersion)" "Theta1 for field" "Theta2 for field" "Theta3 for field" ...
## .. .. .. ..$ log.posterior : num -6.64
## .. .. .. ..$ log.posterior.orig: num -3.37
## .. .. .. ..$ mean : num [1:28678] 0.0726 0.01269 0.00206 0.00886 0.01346 ...
## .. .. .. ..$ improved.mean : num [1:28678] 5.89e-02 1.02e-04 -6.94e-03 5.28e-05 4.44e-03 ...
## .. .. .. ..$ skewness : logi [1:28678] NA NA NA NA NA NA ...
## .. .. .. ..$ Q :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:80857] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:80857] 50.5 -28.3 125.7 183.6 -70.5 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ Qinv :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:80857] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:80857] 0.0359 0.0169 0.0245 0.039 0.0351 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ Qprior :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:64098] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:64098] 49.3 -28.7 121.3 183.6 -70.5 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ cpodens.moments : num[0 , 1:3]
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "mean" "variance" "skewness"
## .. .. .. ..$ gcpodens.moments : num[0 , 1:3]
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "mean" "variance" "log.theta.correction"
## .. .. .. ..$ arg.str : NULL
## .. .. .. ..$ ll.info : num [1:14535, 1:3] -1.572 -0.413 0.432 0.97 -1.55 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "gradient" "hessian" "deriv3"
## .. .. .. ..$ APredictor : num [1:14535, 1:2] 2.95 2.8 2.94 2.99 2.79 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:2] "mean" "variance"
## .. .. .. ..$ Predictor : num [1:28678, 1:2] 2.9289 0.116649 0.058879 0.000102 -0.00694 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:2] "mean" "variance"
## .. .. ..$ :List of 15
## .. .. .. ..$ theta : Named num [1:5] 0.55 -0.2728 -0.1259 0.0622 -0.0354
## .. .. .. .. ..- attr(*, "names")= chr [1:5] "log size for the nbinomial observations (1/overdispersion)" "Theta1 for field" "Theta2 for field" "Theta3 for field" ...
## .. .. .. ..$ log.posterior : num -6.57
## .. .. .. ..$ log.posterior.orig: num -3.3
## .. .. .. ..$ mean : num [1:28678] 0.07623 0.0104 -0.00239 0.00595 0.01099 ...
## .. .. .. ..$ improved.mean : num [1:28678] 0.0573 -0.00774 -0.01564 -0.00705 -0.00229 ...
## .. .. .. ..$ skewness : logi [1:28678] NA NA NA NA NA NA ...
## .. .. .. ..$ Q :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:80857] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:80857] 40.9 -21.9 95.2 137.3 -52.7 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ Qinv :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:80857] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:80857] 0.0421 0.0195 0.03 0.0507 0.0453 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ Qprior :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:64098] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:64098] 39.7 -22.3 90.7 137.3 -52.7 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ cpodens.moments : num[0 , 1:3]
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "mean" "variance" "skewness"
## .. .. .. ..$ gcpodens.moments : num[0 , 1:3]
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "mean" "variance" "log.theta.correction"
## .. .. .. ..$ arg.str : NULL
## .. .. .. ..$ ll.info : num [1:14535, 1:3] -1.588 -0.395 0.42 0.938 -1.563 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "gradient" "hessian" "deriv3"
## .. .. .. ..$ APredictor : num [1:14535, 1:2] 2.95 2.78 2.95 3.01 2.77 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:2] "mean" "variance"
## .. .. .. ..$ Predictor : num [1:28678, 1:2] 2.92937 0.11429 0.0573 -0.00774 -0.01564 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:2] "mean" "variance"
## .. .. ..$ :List of 15
## .. .. .. ..$ theta : Named num [1:5] 0.5217 -0.4509 -0.0648 0.0925 -0.0522
## .. .. .. .. ..- attr(*, "names")= chr [1:5] "log size for the nbinomial observations (1/overdispersion)" "Theta1 for field" "Theta2 for field" "Theta3 for field" ...
## .. .. .. ..$ log.posterior : num -6.19
## .. .. .. ..$ log.posterior.orig: num -2.92
## .. .. .. ..$ mean : num [1:28678] 0.0714 0.0187 0.0126 0.0184 0.0225 ...
## .. .. .. ..$ improved.mean : num [1:28678] 0.05817 0.00627 0.00386 0.00983 0.01376 ...
## .. .. .. ..$ skewness : logi [1:28678] NA NA NA NA NA NA ...
## .. .. .. ..$ Q :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:80857] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:80857] 62.2 -34.4 148.3 218 -83.6 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ Qinv :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:80857] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:80857] 0.0305 0.0154 0.0223 0.034 0.0307 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ Qprior :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:64098] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:64098] 61.1 -34.8 144 218 -83.6 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ cpodens.moments : num[0 , 1:3]
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "mean" "variance" "skewness"
## .. .. .. ..$ gcpodens.moments : num[0 , 1:3]
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "mean" "variance" "log.theta.correction"
## .. .. .. ..$ arg.str : NULL
## .. .. .. ..$ ll.info : num [1:14535, 1:3] -1.548 -0.426 0.438 0.991 -1.527 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "gradient" "hessian" "deriv3"
## .. .. .. ..$ APredictor : num [1:14535, 1:2] 2.95 2.82 2.93 2.98 2.8 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:2] "mean" "variance"
## .. .. .. ..$ Predictor : num [1:28678, 1:2] 2.92953 0.12103 0.05817 0.00627 0.00386 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:2] "mean" "variance"
## .. .. ..$ :List of 15
## .. .. .. ..$ theta : Named num [1:5] 0.5273 -0.1267 0.5924 0.1412 0.0816
## .. .. .. .. ..- attr(*, "names")= chr [1:5] "log size for the nbinomial observations (1/overdispersion)" "Theta1 for field" "Theta2 for field" "Theta3 for field" ...
## .. .. .. ..$ log.posterior : num -6.3
## .. .. .. ..$ log.posterior.orig: num -3.03
## .. .. .. ..$ mean : num [1:28678] 0.0671 0.0134 0.0436 0.0505 0.0545 ...
## .. .. .. ..$ improved.mean : num [1:28678] 0.05413 0.00112 0.03321 0.04041 0.04407 ...
## .. .. .. ..$ skewness : logi [1:28678] NA NA NA NA NA NA ...
## .. .. .. ..$ Q :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:80857] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:80857] 62.2 -34.2 146.2 215 -82.6 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ Qinv :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:80857] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:80857] 0.0317 0.0167 0.0238 0.0386 0.0353 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ Qprior :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:64098] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:64098] 61.1 -34.6 141.9 215 -82.6 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ cpodens.moments : num[0 , 1:3]
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "mean" "variance" "skewness"
## .. .. .. ..$ gcpodens.moments : num[0 , 1:3]
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "mean" "variance" "log.theta.correction"
## .. .. .. ..$ arg.str : NULL
## .. .. .. ..$ ll.info : num [1:14535, 1:3] -1.557 -0.489 0.339 0.875 -1.536 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "gradient" "hessian" "deriv3"
## .. .. .. ..$ APredictor : num [1:14535, 1:2] 2.96 2.87 2.98 3.02 2.8 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:2] "mean" "variance"
## .. .. .. ..$ Predictor : num [1:28678, 1:2] 2.94022 0.10844 0.05413 0.00112 0.03321 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:2] "mean" "variance"
## .. .. ..$ :List of 15
## .. .. .. ..$ theta : Named num [1:5] 0.543 -0.558 -0.663 0.025 -0.148
## .. .. .. .. ..- attr(*, "names")= chr [1:5] "log size for the nbinomial observations (1/overdispersion)" "Theta1 for field" "Theta2 for field" "Theta3 for field" ...
## .. .. .. ..$ log.posterior : num -6.64
## .. .. .. ..$ log.posterior.orig: num -3.37
## .. .. .. ..$ mean : num [1:28678] 0.07168 0.01113 -0.01959 -0.01193 -0.00944 ...
## .. .. .. ..$ improved.mean : num [1:28678] 0.05626 -0.00355 -0.02691 -0.01913 -0.01665 ...
## .. .. .. ..$ skewness : logi [1:28678] NA NA NA NA NA NA ...
## .. .. .. ..$ Q :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:80857] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:80857] 42.8 -23 100.8 145.4 -55.7 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ Qinv :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:80857] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:80857] 0.0392 0.0176 0.0273 0.0414 0.0364 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ Qprior :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:64098] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:64098] 41.6 -23.3 96.4 145.4 -55.7 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ cpodens.moments : num[0 , 1:3]
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "mean" "variance" "skewness"
## .. .. .. ..$ gcpodens.moments : num[0 , 1:3]
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "mean" "variance" "log.theta.correction"
## .. .. .. ..$ arg.str : NULL
## .. .. .. ..$ ll.info : num [1:14535, 1:3] -1.576 -0.361 0.493 1.034 -1.551 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "gradient" "hessian" "deriv3"
## .. .. .. ..$ APredictor : num [1:14535, 1:2] 2.94 2.76 2.91 2.97 2.76 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:2] "mean" "variance"
## .. .. .. ..$ Predictor : num [1:28678, 1:2] 2.92204 0.13254 0.05626 -0.00355 -0.02691 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:2] "mean" "variance"
## .. .. ..$ :List of 15
## .. .. .. ..$ theta : Named num [1:5] 0.539 -0.6 -0.674 1.471 2.865
## .. .. .. .. ..- attr(*, "names")= chr [1:5] "log size for the nbinomial observations (1/overdispersion)" "Theta1 for field" "Theta2 for field" "Theta3 for field" ...
## .. .. .. ..$ log.posterior : num -124
## .. .. .. ..$ log.posterior.orig: num -121
## .. .. .. ..$ mean : num [1:28678] 0.0237 -0.00234 -0.00753 -0.00348 -0.00419 ...
## .. .. .. ..$ improved.mean : num [1:28678] 0.01993 -0.00586 -0.00787 -0.00381 -0.00451 ...
## .. .. .. ..$ skewness : logi [1:28678] NA NA NA NA NA NA ...
## .. .. .. ..$ Q :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:80857] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:80857] 46 -23.6 130.6 166.9 -55.8 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ Qinv :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:80857] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:80857] 0.02904 0.00824 0.01435 0.01514 0.01104 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ Qprior :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:64098] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:64098] 44.8 -24 126.1 166.9 -55.8 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ cpodens.moments : num[0 , 1:3]
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "mean" "variance" "skewness"
## .. .. .. ..$ gcpodens.moments : num[0 , 1:3]
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "mean" "variance" "log.theta.correction"
## .. .. .. ..$ arg.str : NULL
## .. .. .. ..$ ll.info : num [1:14535, 1:3] -1.566 -0.388 0.568 1.158 -1.54 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "gradient" "hessian" "deriv3"
## .. .. .. ..$ APredictor : num [1:14535, 1:2] 2.91 2.78 2.88 2.92 2.73 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:2] "mean" "variance"
## .. .. .. ..$ Predictor : num [1:28678, 1:2] 2.9128 0.16105 0.01993 -0.00586 -0.00787 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:2] "mean" "variance"
## .. .. ..$ :List of 15
## .. .. .. ..$ theta : Named num [1:5] 0.5345 -0.2836 0.0984 -0.3881 -1.0159
## .. .. .. .. ..- attr(*, "names")= chr [1:5] "log size for the nbinomial observations (1/overdispersion)" "Theta1 for field" "Theta2 for field" "Theta3 for field" ...
## .. .. .. ..$ log.posterior : num -77
## .. .. .. ..$ log.posterior.orig: num -73.7
## .. .. .. ..$ mean : num [1:28678] 0.065563 0.02098 -0.000518 0.005243 0.002416 ...
## .. .. .. ..$ improved.mean : num [1:28678] 0.056116 0.011359 -0.003687 0.001884 -0.000344 ...
## .. .. .. ..$ skewness : logi [1:28678] NA NA NA NA NA NA ...
## .. .. .. ..$ Q :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:80857] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:80857] 52.6 -29 125.7 183.7 -70.6 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ Qinv :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:80857] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:80857] 0.0326 0.0156 0.024 0.0307 0.0274 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ Qprior :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:64098] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:64098] 51.4 -29.3 121.2 183.7 -70.6 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ cpodens.moments : num[0 , 1:3]
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "mean" "variance" "skewness"
## .. .. .. ..$ gcpodens.moments : num[0 , 1:3]
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "mean" "variance" "log.theta.correction"
## .. .. .. ..$ arg.str : NULL
## .. .. .. ..$ ll.info : num [1:14535, 1:3] -1.561 -0.343 0.56 1.137 -1.538 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "gradient" "hessian" "deriv3"
## .. .. .. ..$ APredictor : num [1:14535, 1:2] 2.91 2.75 2.88 2.93 2.75 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:2] "mean" "variance"
## .. .. .. ..$ Predictor : num [1:28678, 1:2] 2.89282 0.15522 0.05612 0.01136 -0.00369 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:2] "mean" "variance"
## .. .. ..$ :List of 15
## .. .. .. ..$ theta : Named num [1:5] 0.519 -0.588 -0.597 0.709 1.195
## .. .. .. .. ..- attr(*, "names")= chr [1:5] "log size for the nbinomial observations (1/overdispersion)" "Theta1 for field" "Theta2 for field" "Theta3 for field" ...
## .. .. .. ..$ log.posterior : num -31.5
## .. .. .. ..$ log.posterior.orig: num -28.2
## .. .. .. ..$ mean : num [1:28678] 0.0642 0.0131 -0.0191 -0.0124 -0.0114 ...
## .. .. .. ..$ improved.mean : num [1:28678] 0.05372 0.00319 -0.02243 -0.01557 -0.01464 ...
## .. .. .. ..$ skewness : logi [1:28678] NA NA NA NA NA NA ...
## .. .. .. ..$ Q :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:80857] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:80857] 48.9 -26.4 118.8 170.1 -64.2 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ Qinv :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:80857] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:80857] 0.0337 0.0145 0.0225 0.0293 0.025 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ Qprior :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:64098] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:64098] 47.7 -26.8 114.4 170.1 -64.2 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ cpodens.moments : num[0 , 1:3]
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "mean" "variance" "skewness"
## .. .. .. ..$ gcpodens.moments : num[0 , 1:3]
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "mean" "variance" "log.theta.correction"
## .. .. .. ..$ arg.str : NULL
## .. .. .. ..$ ll.info : num [1:14535, 1:3] -1.542 -0.357 0.533 1.096 -1.516 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "gradient" "hessian" "deriv3"
## .. .. .. ..$ APredictor : num [1:14535, 1:2] 2.93 2.76 2.89 2.94 2.75 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:2] "mean" "variance"
## .. .. .. ..$ Predictor : num [1:28678, 1:2] 2.91359 0.14475 0.05372 0.00319 -0.02243 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:2] "mean" "variance"
## .. .. ..$ :List of 15
## .. .. .. ..$ theta : Named num [1:5] 0.51 -0.254 0.31 -0.07 -0.438
## .. .. .. .. ..- attr(*, "names")= chr [1:5] "log size for the nbinomial observations (1/overdispersion)" "Theta1 for field" "Theta2 for field" "Theta3 for field" ...
## .. .. .. ..$ log.posterior : num -6.61
## .. .. .. ..$ log.posterior.orig: num -3.34
## .. .. .. ..$ mean : num [1:28678] 0.0788 0.0255 0.0203 0.0263 0.0296 ...
## .. .. .. ..$ improved.mean : num [1:28678] 0.0653 0.013 0.0117 0.0178 0.021 ...
## .. .. .. ..$ skewness : logi [1:28678] NA NA NA NA NA NA ...
## .. .. .. ..$ Q :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:80857] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:80857] 61.6 -34.6 150.4 221.4 -85.1 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ Qinv :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:80857] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:80857] 0.0311 0.0157 0.0224 0.0342 0.031 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ Qprior :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:64098] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:64098] 60.4 -34.9 146.1 221.4 -85.1 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ cpodens.moments : num[0 , 1:3]
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "mean" "variance" "skewness"
## .. .. .. ..$ gcpodens.moments : num[0 , 1:3]
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "mean" "variance" "log.theta.correction"
## .. .. .. ..$ arg.str : NULL
## .. .. .. ..$ ll.info : num [1:14535, 1:3] -1.532 -0.424 0.43 0.98 -1.512 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "gradient" "hessian" "deriv3"
## .. .. .. ..$ APredictor : num [1:14535, 1:2] 2.95 2.82 2.94 2.98 2.8 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:2] "mean" "variance"
## .. .. .. ..$ Predictor : num [1:28678, 1:2] 2.9214 0.1199 0.0653 0.013 0.0117 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:2] "mean" "variance"
## .. .. ..$ :List of 15
## .. .. .. ..$ theta : Named num [1:5] 0.53 -0.367 -0.279 -0.136 -0.533
## .. .. .. .. ..- attr(*, "names")= chr [1:5] "log size for the nbinomial observations (1/overdispersion)" "Theta1 for field" "Theta2 for field" "Theta3 for field" ...
## .. .. .. ..$ log.posterior : num -17.4
## .. .. .. ..$ log.posterior.orig: num -14.1
## .. .. .. ..$ mean : num [1:28678] 0.08066 0.02161 -0.01058 -0.00329 -0.00177 ...
## .. .. .. ..$ improved.mean : num [1:28678] 0.06518 0.00671 -0.0178 -0.01056 -0.00874 ...
## .. .. .. ..$ skewness : logi [1:28678] NA NA NA NA NA NA ...
## .. .. .. ..$ Q :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:80857] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:80857] 43.1 -23.6 104.2 151 -58 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ Qinv :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:80857] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:80857] 0.0396 0.0181 0.0275 0.0414 0.0368 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ Qprior :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:64098] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:64098] 41.9 -24 99.8 151 -58 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ cpodens.moments : num[0 , 1:3]
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "mean" "variance" "skewness"
## .. .. .. ..$ gcpodens.moments : num[0 , 1:3]
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "mean" "variance" "log.theta.correction"
## .. .. .. ..$ arg.str : NULL
## .. .. .. ..$ ll.info : num [1:14535, 1:3] -1.557 -0.345 0.501 1.039 -1.533 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "gradient" "hessian" "deriv3"
## .. .. .. ..$ APredictor : num [1:14535, 1:2] 2.93 2.75 2.91 2.96 2.76 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:2] "mean" "variance"
## .. .. .. ..$ Predictor : num [1:28678, 1:2] 2.90698 0.13489 0.06518 0.00671 -0.0178 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:2] "mean" "variance"
## .. .. ..$ :List of 15
## .. .. .. ..$ theta : Named num [1:5] 0.5249 -0.316 -0.0628 0.7478 1.3045
## .. .. .. .. ..- attr(*, "names")= chr [1:5] "log size for the nbinomial observations (1/overdispersion)" "Theta1 for field" "Theta2 for field" "Theta3 for field" ...
## .. .. .. ..$ log.posterior : num -13.3
## .. .. .. ..$ log.posterior.orig: num -10.1
## .. .. .. ..$ mean : num [1:28678] 0.07999 0.02216 -0.01172 -0.00448 -0.00121 ...
## .. .. .. ..$ improved.mean : num [1:28678] 0.0656 0.00839 -0.01913 -0.01171 -0.00862 ...
## .. .. .. ..$ skewness : logi [1:28678] NA NA NA NA NA NA ...
## .. .. .. ..$ Q :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:80857] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:80857] 47.6 -25.8 112.9 163.2 -62.3 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ Qinv :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:80857] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:80857] 0.0364 0.0169 0.0257 0.0379 0.0334 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ Qprior :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:64098] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:64098] 46.4 -26.1 108.5 163.2 -62.3 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ cpodens.moments : num[0 , 1:3]
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "mean" "variance" "skewness"
## .. .. .. ..$ gcpodens.moments : num[0 , 1:3]
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "mean" "variance" "log.theta.correction"
## .. .. .. ..$ arg.str : NULL
## .. .. .. ..$ ll.info : num [1:14535, 1:3] -1.551 -0.362 0.495 1.038 -1.527 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "gradient" "hessian" "deriv3"
## .. .. .. ..$ APredictor : num [1:14535, 1:2] 2.94 2.77 2.91 2.96 2.77 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:2] "mean" "variance"
## .. .. .. ..$ Predictor : num [1:28678, 1:2] 2.91279 0.13046 0.0656 0.00839 -0.01913 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:2] "mean" "variance"
## .. .. ..$ :List of 15
## .. .. .. ..$ theta : Named num [1:5] 0.514 -0.457 -0.248 -0.174 -0.516
## .. .. .. .. ..- attr(*, "names")= chr [1:5] "log size for the nbinomial observations (1/overdispersion)" "Theta1 for field" "Theta2 for field" "Theta3 for field" ...
## .. .. .. ..$ log.posterior : num -22.3
## .. .. .. ..$ log.posterior.orig: num -19
## .. .. .. ..$ mean : num [1:28678] 0.078398 0.025195 -0.00574 0.000639 0.002117 ...
## .. .. .. ..$ improved.mean : num [1:28678] 0.06499 0.01204 -0.01205 -0.00569 -0.004 ...
## .. .. .. ..$ skewness : logi [1:28678] NA NA NA NA NA NA ...
## .. .. .. ..$ Q :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:80857] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:80857] 52 -28.2 120.7 176.2 -67.6 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ Qinv :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:80857] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:80857] 0.0341 0.0166 0.0253 0.0364 0.0326 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ Qprior :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:64098] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:64098] 50.9 -28.5 116.3 176.2 -67.6 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ cpodens.moments : num[0 , 1:3]
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "mean" "variance" "skewness"
## .. .. .. ..$ gcpodens.moments : num[0 , 1:3]
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "mean" "variance" "log.theta.correction"
## .. .. .. ..$ arg.str : NULL
## .. .. .. ..$ ll.info : num [1:14535, 1:3] -1.536 -0.356 0.513 1.069 -1.514 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "gradient" "hessian" "deriv3"
## .. .. .. ..$ APredictor : num [1:14535, 1:2] 2.94 2.76 2.9 2.94 2.77 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:2] "mean" "variance"
## .. .. .. ..$ Predictor : num [1:28678, 1:2] 2.908 0.138 0.065 0.012 -0.012 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:2] "mean" "variance"
## .. .. ..$ :List of 15
## .. .. .. ..$ theta : Named num [1:5] 0.5097 -0.4053 -0.0319 0.7091 1.322
## .. .. .. .. ..- attr(*, "names")= chr [1:5] "log size for the nbinomial observations (1/overdispersion)" "Theta1 for field" "Theta2 for field" "Theta3 for field" ...
## .. .. .. ..$ log.posterior : num -22.4
## .. .. .. ..$ log.posterior.orig: num -19.1
## .. .. .. ..$ mean : num [1:28678] 0.07837 0.027049 -0.005781 0.000474 0.00339 ...
## .. .. .. ..$ improved.mean : num [1:28678] 0.06587 0.01483 -0.01218 -0.00577 -0.00301 ...
## .. .. .. ..$ skewness : logi [1:28678] NA NA NA NA NA NA ...
## .. .. .. ..$ Q :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:80857] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:80857] 57.5 -30.7 130.8 190.3 -72.6 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ Qinv :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:80857] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:80857] 0.0313 0.0154 0.0235 0.0333 0.0294 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ Qprior :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:64098] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:64098] 56.3 -31.1 126.4 190.3 -72.6 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ cpodens.moments : num[0 , 1:3]
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "mean" "variance" "skewness"
## .. .. .. ..$ gcpodens.moments : num[0 , 1:3]
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "mean" "variance" "log.theta.correction"
## .. .. .. ..$ arg.str : NULL
## .. .. .. ..$ ll.info : num [1:14535, 1:3] -1.53 -0.369 0.51 1.071 -1.507 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "gradient" "hessian" "deriv3"
## .. .. .. ..$ APredictor : num [1:14535, 1:2] 2.94 2.77 2.9 2.94 2.77 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:2] "mean" "variance"
## .. .. .. ..$ Predictor : num [1:28678, 1:2] 2.9107 0.1349 0.0659 0.0148 -0.0122 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:2] "mean" "variance"
## .. .. ..$ :List of 15
## .. .. .. ..$ theta : Named num [1:5] 0.529 -0.518 -0.621 0.644 1.227
## .. .. .. .. ..- attr(*, "names")= chr [1:5] "log size for the nbinomial observations (1/overdispersion)" "Theta1 for field" "Theta2 for field" "Theta3 for field" ...
## .. .. .. ..$ log.posterior : num -26.8
## .. .. .. ..$ log.posterior.orig: num -23.5
## .. .. .. ..$ mean : num [1:28678] 0.0684 0.013 -0.022 -0.0138 -0.0132 ...
## .. .. .. ..$ improved.mean : num [1:28678] 0.055891 0.000715 -0.026084 -0.017825 -0.017268 ...
## .. .. .. ..$ skewness : logi [1:28678] NA NA NA NA NA NA ...
## .. .. .. ..$ Q :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:80857] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:80857] 40.6 -21 93 131.4 -49.5 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ Qinv :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:80857] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:80857] 0.0391 0.0165 0.027 0.0369 0.0314 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ Qprior :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:64098] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:64098] 39.4 -21.4 88.5 131.4 -49.5 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ cpodens.moments : num[0 , 1:3]
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "mean" "variance" "skewness"
## .. .. .. ..$ gcpodens.moments : num[0 , 1:3]
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "mean" "variance" "log.theta.correction"
## .. .. .. ..$ arg.str : NULL
## .. .. .. ..$ ll.info : num [1:14535, 1:3] -1.555 -0.344 0.522 1.067 -1.527 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "gradient" "hessian" "deriv3"
## .. .. .. ..$ APredictor : num [1:14535, 1:2] 2.93 2.75 2.9 2.95 2.73 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:2] "mean" "variance"
## .. .. .. ..$ Predictor : num [1:28678, 1:2] 2.91092 0.144853 0.055891 0.000715 -0.026084 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:2] "mean" "variance"
## .. .. ..$ :List of 15
## .. .. .. ..$ theta : Named num [1:5] 0.52 -0.184 0.286 -0.136 -0.406
## .. .. .. .. ..- attr(*, "names")= chr [1:5] "log size for the nbinomial observations (1/overdispersion)" "Theta1 for field" "Theta2 for field" "Theta3 for field" ...
## .. .. .. ..$ log.posterior : num -5.11
## .. .. .. ..$ log.posterior.orig: num -1.84
## .. .. .. ..$ mean : num [1:28678] 0.084 0.0255 0.0212 0.0285 0.0323 ...
## .. .. .. ..$ improved.mean : num [1:28678] 0.06691 0.00895 0.00918 0.01661 0.02025 ...
## .. .. .. ..$ skewness : logi [1:28678] NA NA NA NA NA NA ...
## .. .. .. ..$ Q :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:80857] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:80857] 51 -27.5 117 170.8 -65.6 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ Qinv :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:80857] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:80857] 0.0359 0.0179 0.027 0.0436 0.0395 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ Qprior :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:64098] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:64098] 49.9 -27.9 112.7 170.8 -65.6 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ cpodens.moments : num[0 , 1:3]
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "mean" "variance" "skewness"
## .. .. .. ..$ gcpodens.moments : num[0 , 1:3]
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "mean" "variance" "log.theta.correction"
## .. .. .. ..$ arg.str : NULL
## .. .. .. ..$ ll.info : num [1:14535, 1:3] -1.546 -0.416 0.414 0.948 -1.524 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "gradient" "hessian" "deriv3"
## .. .. .. ..$ APredictor : num [1:14535, 1:2] 2.95 2.81 2.95 2.99 2.78 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:2] "mean" "variance"
## .. .. .. ..$ Predictor : num [1:28678, 1:2] 2.9206 0.11712 0.06691 0.00895 0.00918 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:2] "mean" "variance"
## .. .. ..$ :List of 15
## .. .. .. ..$ theta : Named num [1:5] 0.55 -0.452 -0.25 -0.122 -0.541
## .. .. .. .. ..- attr(*, "names")= chr [1:5] "log size for the nbinomial observations (1/overdispersion)" "Theta1 for field" "Theta2 for field" "Theta3 for field" ...
## .. .. .. ..$ log.posterior : num -23.6
## .. .. .. ..$ log.posterior.orig: num -20.3
## .. .. .. ..$ mean : num [1:28678] 0.077204 0.023133 -0.007273 -0.001036 0.000416 ...
## .. .. .. ..$ improved.mean : num [1:28678] 0.06426 0.01076 -0.01306 -0.00686 -0.00517 ...
## .. .. .. ..$ skewness : logi [1:28678] NA NA NA NA NA NA ...
## .. .. .. ..$ Q :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:80857] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:80857] 52.6 -29.2 128.4 187.7 -72.1 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ Qinv :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:80857] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:80857] 0.0336 0.0159 0.0236 0.0338 0.0302 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ Qprior :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:64098] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:64098] 51.4 -29.6 123.9 187.7 -72.1 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ cpodens.moments : num[0 , 1:3]
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "mean" "variance" "skewness"
## .. .. .. ..$ gcpodens.moments : num[0 , 1:3]
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "mean" "variance" "log.theta.correction"
## .. .. .. ..$ arg.str : NULL
## .. .. .. ..$ ll.info : num [1:14535, 1:3] -1.586 -0.366 0.53 1.101 -1.563 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "gradient" "hessian" "deriv3"
## .. .. .. ..$ APredictor : num [1:14535, 1:2] 2.93 2.76 2.9 2.95 2.77 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:2] "mean" "variance"
## .. .. .. ..$ Predictor : num [1:28678, 1:2] 2.9072 0.1373 0.0643 0.0108 -0.0131 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:2] "mean" "variance"
## .. .. ..$ :List of 15
## .. .. .. ..$ theta : Named num [1:5] 0.5448 -0.4002 -0.0335 0.7609 1.2972
## .. .. .. .. ..- attr(*, "names")= chr [1:5] "log size for the nbinomial observations (1/overdispersion)" "Theta1 for field" "Theta2 for field" "Theta3 for field" ...
## .. .. .. ..$ log.posterior : num -20.2
## .. .. .. ..$ log.posterior.orig: num -17
## .. .. .. ..$ mean : num [1:28678] 0.07666 0.02383 -0.00727 -0.00108 0.00206 ...
## .. .. .. ..$ improved.mean : num [1:28678] 0.06465 0.01243 -0.01332 -0.00699 -0.004 ...
## .. .. .. ..$ skewness : logi [1:28678] NA NA NA NA NA NA ...
## .. .. .. ..$ Q :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:80857] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:80857] 58.1 -31.9 139.1 202.7 -77.4 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ Qinv :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:80857] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:80857] 0.0309 0.0148 0.0221 0.0313 0.0276 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ Qprior :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:64098] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:64098] 56.9 -32.3 134.7 202.7 -77.4 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ cpodens.moments : num[0 , 1:3]
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "mean" "variance" "skewness"
## .. .. .. ..$ gcpodens.moments : num[0 , 1:3]
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "mean" "variance" "log.theta.correction"
## .. .. .. ..$ arg.str : NULL
## .. .. .. ..$ ll.info : num [1:14535, 1:3] -1.58 -0.384 0.519 1.093 -1.556 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "gradient" "hessian" "deriv3"
## .. .. .. ..$ APredictor : num [1:14535, 1:2] 2.94 2.78 2.9 2.95 2.77 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:2] "mean" "variance"
## .. .. .. ..$ Predictor : num [1:28678, 1:2] 2.913 0.1324 0.0646 0.0124 -0.0133 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:2] "mean" "variance"
## .. .. ..$ :List of 15
## .. .. .. ..$ theta : Named num [1:5] 0.564 -0.513 -0.622 0.695 1.202
## .. .. .. .. ..- attr(*, "names")= chr [1:5] "log size for the nbinomial observations (1/overdispersion)" "Theta1 for field" "Theta2 for field" "Theta3 for field" ...
## .. .. .. ..$ log.posterior : num -25.8
## .. .. .. ..$ log.posterior.orig: num -22.5
## .. .. .. ..$ mean : num [1:28678] 0.0674 0.0109 -0.0229 -0.0148 -0.014 ...
## .. .. .. ..$ improved.mean : num [1:28678] 0.05515 -0.00079 -0.02684 -0.01865 -0.01789 ...
## .. .. .. ..$ skewness : logi [1:28678] NA NA NA NA NA NA ...
## .. .. .. ..$ Q :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:80857] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:80857] 41 -21.8 98.8 139.9 -52.7 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ Qinv :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:80857] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:80857] 0.0387 0.0159 0.0254 0.0349 0.0297 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ Qprior :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:64098] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:64098] 39.8 -22.2 94.2 139.9 -52.7 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ cpodens.moments : num[0 , 1:3]
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "mean" "variance" "skewness"
## .. .. .. ..$ gcpodens.moments : num[0 , 1:3]
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "mean" "variance" "log.theta.correction"
## .. .. .. ..$ arg.str : NULL
## .. .. .. ..$ ll.info : num [1:14535, 1:3] -1.606 -0.357 0.531 1.09 -1.577 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "gradient" "hessian" "deriv3"
## .. .. .. ..$ APredictor : num [1:14535, 1:2] 2.93 2.75 2.9 2.96 2.74 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:2] "mean" "variance"
## .. .. .. ..$ Predictor : num [1:28678, 1:2] 2.91239 0.14259 0.05515 -0.00079 -0.02684 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:2] "mean" "variance"
## .. .. ..$ :List of 15
## .. .. .. ..$ theta : Named num [1:5] 0.5553 -0.1792 0.2844 -0.0841 -0.4306
## .. .. .. .. ..- attr(*, "names")= chr [1:5] "log size for the nbinomial observations (1/overdispersion)" "Theta1 for field" "Theta2 for field" "Theta3 for field" ...
## .. .. .. ..$ log.posterior : num -4.61
## .. .. .. ..$ log.posterior.orig: num -1.34
## .. .. .. ..$ mean : num [1:28678] 0.082 0.0222 0.0149 0.022 0.0259 ...
## .. .. .. ..$ improved.mean : num [1:28678] 0.06654 0.00761 0.00457 0.01182 0.01559 ...
## .. .. .. ..$ skewness : logi [1:28678] NA NA NA NA NA NA ...
## .. .. .. ..$ Q :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:80857] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:80857] 51.6 -28.5 124.5 181.9 -69.9 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ Qinv :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:80857] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:80857] 0.0354 0.0172 0.0252 0.0405 0.0366 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ Qprior :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:64098] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:64098] 50.4 -28.9 120 181.9 -69.9 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ cpodens.moments : num[0 , 1:3]
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "mean" "variance" "skewness"
## .. .. .. ..$ gcpodens.moments : num[0 , 1:3]
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "mean" "variance" "log.theta.correction"
## .. .. .. ..$ arg.str : NULL
## .. .. .. ..$ ll.info : num [1:14535, 1:3] -1.597 -0.424 0.432 0.981 -1.573 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "gradient" "hessian" "deriv3"
## .. .. .. ..$ APredictor : num [1:14535, 1:2] 2.95 2.8 2.94 2.99 2.79 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:2] "mean" "variance"
## .. .. .. ..$ Predictor : num [1:28678, 1:2] 2.92067 0.116 0.06654 0.00761 0.00457 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:2] "mean" "variance"
## .. .. ..$ :List of 15
## .. .. .. ..$ theta : Named num [1:5] 0.549 -0.603 -0.591 0.657 1.22
## .. .. .. .. ..- attr(*, "names")= chr [1:5] "log size for the nbinomial observations (1/overdispersion)" "Theta1 for field" "Theta2 for field" "Theta3 for field" ...
## .. .. .. ..$ log.posterior : num -37.2
## .. .. .. ..$ log.posterior.orig: num -33.9
## .. .. .. ..$ mean : num [1:28678] 0.0659 0.0148 -0.019 -0.0119 -0.0111 ...
## .. .. .. ..$ improved.mean : num [1:28678] 0.05549 0.00468 -0.0223 -0.01517 -0.01442 ...
## .. .. .. ..$ skewness : logi [1:28678] NA NA NA NA NA NA ...
## .. .. .. ..$ Q :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:80857] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:80857] 49.5 -26 114.2 163 -61.5 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ Qinv :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:80857] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:80857] 0.0331 0.0145 0.0232 0.0305 0.026 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ Qprior :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:64098] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:64098] 48.2 -26.4 109.7 163 -61.5 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ cpodens.moments : num[0 , 1:3]
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "mean" "variance" "skewness"
## .. .. .. ..$ gcpodens.moments : num[0 , 1:3]
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "mean" "variance" "log.theta.correction"
## .. .. .. ..$ arg.str : NULL
## .. .. .. ..$ ll.info : num [1:14535, 1:3] -1.584 -0.362 0.55 1.128 -1.557 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "gradient" "hessian" "deriv3"
## .. .. .. ..$ APredictor : num [1:14535, 1:2] 2.93 2.76 2.89 2.94 2.74 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:2] "mean" "variance"
## .. .. .. ..$ Predictor : num [1:28678, 1:2] 2.91113 0.14618 0.05549 0.00468 -0.0223 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:2] "mean" "variance"
## .. .. ..$ :List of 15
## .. .. .. ..$ theta : Named num [1:5] 0.54 -0.268 0.315 -0.123 -0.413
## .. .. .. .. ..- attr(*, "names")= chr [1:5] "log size for the nbinomial observations (1/overdispersion)" "Theta1 for field" "Theta2 for field" "Theta3 for field" ...
## .. .. .. ..$ log.posterior : num -7.66
## .. .. .. ..$ log.posterior.orig: num -4.39
## .. .. .. ..$ mean : num [1:28678] 0.0811 0.028 0.026 0.0323 0.0357 ...
## .. .. .. ..$ improved.mean : num [1:28678] 0.0667 0.0142 0.0162 0.0227 0.0259 ...
## .. .. .. ..$ skewness : logi [1:28678] NA NA NA NA NA NA ...
## .. .. .. ..$ Q :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:80857] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:80857] 62.3 -34 144.4 212.2 -81.5 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ Qinv :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:80857] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:80857] 0.0306 0.0158 0.0232 0.036 0.0327 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ Qprior :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:64098] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:64098] 61.1 -34.4 140 212.2 -81.5 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ cpodens.moments : num[0 , 1:3]
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "mean" "variance" "skewness"
## .. .. .. ..$ gcpodens.moments : num[0 , 1:3]
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "mean" "variance" "log.theta.correction"
## .. .. .. ..$ arg.str : NULL
## .. .. .. ..$ ll.info : num [1:14535, 1:3] -1.575 -0.439 0.433 0.996 -1.553 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "gradient" "hessian" "deriv3"
## .. .. .. ..$ APredictor : num [1:14535, 1:2] 2.95 2.82 2.94 2.98 2.79 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:2] "mean" "variance"
## .. .. .. ..$ Predictor : num [1:28678, 1:2] 2.9206 0.1199 0.0667 0.0142 0.0162 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:2] "mean" "variance"
## .. .. ..$ :List of 15
## .. .. .. ..$ theta : Named num [1:5] 0.56 -0.382 -0.273 -0.188 -0.508
## .. .. .. .. ..- attr(*, "names")= chr [1:5] "log size for the nbinomial observations (1/overdispersion)" "Theta1 for field" "Theta2 for field" "Theta3 for field" ...
## .. .. .. ..$ log.posterior : num -19.1
## .. .. .. ..$ log.posterior.orig: num -15.8
## .. .. .. ..$ mean : num [1:28678] 0.082423 0.023099 -0.009735 -0.00206 -0.000438 ...
## .. .. .. ..$ improved.mean : num [1:28678] 0.06703 0.00788 -0.0174 -0.00975 -0.00787 ...
## .. .. .. ..$ skewness : logi [1:28678] NA NA NA NA NA NA ...
## .. .. .. ..$ Q :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:80857] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:80857] 43.6 -23.2 100.1 144.8 -55.6 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ Qinv :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:80857] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:80857] 0.0389 0.0181 0.0284 0.0436 0.0388 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ Qprior :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:64098] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:64098] 42.4 -23.6 95.6 144.8 -55.6 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ cpodens.moments : num[0 , 1:3]
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "mean" "variance" "skewness"
## .. .. .. ..$ gcpodens.moments : num[0 , 1:3]
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "mean" "variance" "log.theta.correction"
## .. .. .. ..$ arg.str : NULL
## .. .. .. ..$ ll.info : num [1:14535, 1:3] -1.601 -0.354 0.51 1.061 -1.575 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "gradient" "hessian" "deriv3"
## .. .. .. ..$ APredictor : num [1:14535, 1:2] 2.93 2.75 2.91 2.97 2.76 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:2] "mean" "variance"
## .. .. .. ..$ Predictor : num [1:28678, 1:2] 2.90624 0.13486 0.06703 0.00788 -0.0174 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:2] "mean" "variance"
## .. .. ..$ :List of 15
## .. .. .. ..$ theta : Named num [1:5] 0.5548 -0.3302 -0.0573 0.695 1.3298
## .. .. .. .. ..- attr(*, "names")= chr [1:5] "log size for the nbinomial observations (1/overdispersion)" "Theta1 for field" "Theta2 for field" "Theta3 for field" ...
## .. .. .. ..$ log.posterior : num -17.8
## .. .. .. ..$ log.posterior.orig: num -14.6
## .. .. .. ..$ mean : num [1:28678] 8.25e-02 2.51e-02 -1.06e-02 -3.08e-03 1.48e-05 ...
## .. .. .. ..$ improved.mean : num [1:28678] 0.0682 0.0109 -0.0182 -0.0105 -0.0076 ...
## .. .. .. ..$ skewness : logi [1:28678] NA NA NA NA NA NA ...
## .. .. .. ..$ Q :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:80857] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:80857] 48.2 -25.4 108.5 156.4 -59.7 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ Qinv :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:80857] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:80857] 0.0357 0.0169 0.0265 0.0395 0.0347 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ Qprior :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:64098] 0 0 1 2 2 3 2 4 5 6 ...
## .. .. .. .. .. ..@ p : int [1:28679] 0 1 3 4 6 8 9 10 11 12 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 28678 28678
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:64098] 47 -25.7 104 156.4 -59.7 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ cpodens.moments : num[0 , 1:3]
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "mean" "variance" "skewness"
## .. .. .. ..$ gcpodens.moments : num[0 , 1:3]
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "mean" "variance" "log.theta.correction"
## .. .. .. ..$ arg.str : NULL
## .. .. .. ..$ ll.info : num [1:14535, 1:3] -1.594 -0.367 0.511 1.07 -1.568 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:3] "gradient" "hessian" "deriv3"
## .. .. .. ..$ APredictor : num [1:14535, 1:2] 2.94 2.76 2.91 2.96 2.76 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:2] "mean" "variance"
## .. .. .. ..$ Predictor : num [1:28678, 1:2] 2.9094 0.1322 0.0682 0.0109 -0.0182 ...
## .. .. .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..$ : chr [1:2] "mean" "variance"
## .. ..$ max.log.posterior: num -56720
## ..$ nfunc : num 288
## ..$ warnings : chr(0)
## ..$ opt.trace :List of 3
## .. ..$ f : Named num [1:35] 62734 62733 62721 58041 58040 ...
## .. .. ..- attr(*, "names")= chr [1:35] "iter1" "iter2" "iter3" "iter4" ...
## .. ..$ nfunc: Named int [1:35] 1 2 5 7 9 12 13 14 15 21 ...
## .. .. ..- attr(*, "names")= chr [1:35] "iter1" "iter2" "iter3" "iter4" ...
## .. ..$ theta: num [1:35, 1:5] 2.3 2.3 2.3 1.4 1.4 ...
## .. .. ..- attr(*, "dimnames")=List of 2
## .. .. .. ..$ : chr [1:35] "iter1" "iter2" "iter3" "iter4" ...
## .. .. .. ..$ : chr [1:5] "theta1" "theta2" "theta3" "theta4" ...
## ..$ theta.mode : num [1:5] 0.5357 -0.3628 -0.095 0.0775 -0.0439
## ..$ linkfunctions :List of 2
## .. ..$ names: chr "log"
## .. ..$ link : int [1:14535] 1 1 1 1 1 1 1 1 1 1 ...
## ..$ family : int [1:14535] 1 1 1 1 1 1 1 1 1 1 ...
## $ dic :List of 14
## ..$ dic : num 113008
## ..$ p.eff : num 930
## ..$ mean.deviance : num 112078
## ..$ deviance.mean : num 111148
## ..$ dic.sat : num 18826
## ..$ mean.deviance.sat: num 17896
## ..$ deviance.mean.sat: num 16950
## ..$ family.dic : num 113008
## ..$ family.dic.sat : num 18841
## ..$ family.p.eff : num 930
## ..$ family : num [1:14535] 1 1 1 1 1 1 1 1 1 1 ...
## ..$ local.dic : num [1:14535] 8.56 6.79 8.15 9.17 8.06 ...
## ..$ local.dic.sat : num [1:14535] 8.563 0.291 0.328 0.788 8.062 ...
## ..$ local.p.eff : num [1:14535] 0.0101 0.0733 0.1155 0.1822 0.016 ...
## $ mode :List of 5
## ..$ theta : Named num [1:5] 0.5357 -0.3628 -0.095 0.0775 -0.0439
## .. ..- attr(*, "names")= chr [1:5] "log size for the nbinomial observations (1/overdispersion)" "Theta1 for field" "Theta2 for field" "Theta3 for field" ...
## ..$ x : num [1:71891] 2.95 2.79 2.94 2.99 2.78 ...
## ..$ theta.tags : chr [1:5] "log size for the nbinomial observations (1/overdispersion)" "Theta1 for field" "Theta2 for field" "Theta3 for field" ...
## ..$ mode.status : num 0
## ..$ log.posterior.mode: num -56720
## $ joint.hyper :'data.frame': 13 obs. of 7 variables:
## ..$ log size for the nbinomial observations (1/overdispersion): num [1:13] 0.536 0.572 0.5 0.533 0.538 ...
## ..$ Theta1 for field : num [1:13] -0.363 -0.368 -0.358 -0.374 -0.352 ...
## ..$ Theta2 for field : num [1:13] -0.095 -0.0928 -0.0972 -0.0909 -0.0988 ...
## ..$ Theta3 for field : num [1:13] 0.0775 0.077 0.0781 0.0171 0.1341 ...
## ..$ Theta4 for field : num [1:13] -0.0439 -0.0436 -0.0442 -0.015 -0.0709 ...
## ..$ Log posterior density : num [1:13] -56733 -56736 -56736 -56736 -56736 ...
## ..$ Total integration weight (log.dens included) : num [1:13] 0.2392 0.0435 0.0433 0.0656 0.0309 ...
## $ nhyper : int 5
## $ version :List of 2
## ..$ inla.call: chr "GITCOMMIT [dd38f0f7c6eb72df31ce7dd489d9352e91ffe0df - Thu Apr 25 18:31:00 2024 +0300]"
## ..$ R.INLA : Named chr "24.04.25-1"
## .. ..- attr(*, "names")= chr "version"
## $ Q : NULL
## $ graph : NULL
## $ ok : logi TRUE
## $ cpu.intern : chr [1:16] "Wall-clock time used on [/tmp/RtmpsdKiw1/fileddb914301aaea/Model.ini]" "Preparations : 0.062 seconds" "Approx inference (stage1): 7.335 seconds" "Approx inference (stage2): 0.001 seconds" ...
## $ cpu.used : Named num [1:4] 0.192 7.897 1.577 9.666
## ..- attr(*, "names")= chr [1:4] "Pre" "Running" "Post" "Total"
## $ all.hyper :List of 4
## ..$ predictor:List of 1
## .. ..$ hyper:List of 1
## .. .. ..$ theta:List of 9
## .. .. .. ..$ hyperid : num 53001
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "log precision"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name: chr "prec"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 13.8
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi TRUE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "loggamma"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1e+00 1e-05
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta:function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## ..$ family :List of 1
## .. ..$ :List of 4
## .. .. ..$ hyperid: chr "INLA.Data1"
## .. .. ..$ label : chr "nbinomial"
## .. .. ..$ hyper :List of 1
## .. .. .. ..$ theta:List of 11
## .. .. .. .. ..$ hyperid : num 63001
## .. .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. .. ..$ name : chr "size"
## .. .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. .. ..$ short.name : chr "size"
## .. .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. .. ..$ output.name : chr "size for the nbinomial observations (1/overdispersion)"
## .. .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. .. ..$ output.name.intern: chr "log size for the nbinomial observations (1/overdispersion)"
## .. .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. .. ..$ initial : num 2.3
## .. .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. .. ..$ prior : chr "pc.mgamma"
## .. .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. .. ..$ param : num 7
## .. .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. .. ..$ to.theta :function (x)
## .. .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. .. ..$ from.theta :function (x)
## .. .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ link :List of 1
## .. .. .. ..$ hyper: list()
## ..$ linear :List of 2
## .. ..$ :List of 3
## .. .. ..$ label : chr "Intercept"
## .. .. ..$ prior.mean: num 0
## .. .. ..$ prior.prec: num 0.001
## .. ..$ :List of 3
## .. .. ..$ label : chr "SpeedLimit"
## .. .. ..$ prior.mean: num 0
## .. .. ..$ prior.prec: num 0.001
## ..$ random :List of 3
## .. ..$ : NULL
## .. ..$ : NULL
## .. ..$ :List of 3
## .. .. ..$ hyperid : chr "field"
## .. .. ..$ hyper : NULL
## .. .. ..$ group.hyper:List of 1
## .. .. .. ..$ theta:List of 9
## .. .. .. .. ..$ hyperid : num 40001
## .. .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. .. ..$ name : chr "logit correlation"
## .. .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. .. ..$ short.name: chr "rho"
## .. .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. .. ..$ initial : num 1
## .. .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. .. ..$ prior : chr "normal"
## .. .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. .. ..$ param : num [1:2] 0 0.2
## .. .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. .. ..$ to.theta :function (x, REPLACE.ME.ngroup)
## .. .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. .. ..$ from.theta:function (x, REPLACE.ME.ngroup)
## .. .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## $ .args :List of 30
## ..$ formula :Class 'formula' language BRU.response ~ f(Intercept, model = BRU_Intercept_main_model, ngroup = 1, nrep = 1, values = BRU_Intercept_v| __truncated__ ...
## ..$ family : chr "nbinomial"
## ..$ data :List of 21
## .. ..$ BRU.response : num [1:14535] 0 12 24 32 0 19 22 19 30 14 ...
## .. ..$ BRU.E : num [1:14535] 1 1 1 1 1 1 1 1 1 1 ...
## .. ..$ BRU.Ntrials : num [1:14535] 1 1 1 1 1 1 1 1 1 1 ...
## .. ..$ BRU.weights : num [1:14535] 1 1 1 1 1 1 1 1 1 1 ...
## .. ..$ BRU.scale : num [1:14535] 1 1 1 1 1 1 1 1 1 1 ...
## .. ..$ BRU.offset : num [1:14535] 0 0 0 0 0 0 0 0 0 0 ...
## .. ..$ Intercept : num [1:28678] 1 NA NA NA NA NA NA NA NA NA ...
## .. ..$ Intercept.group : int [1:28678] 1 NA NA NA NA NA NA NA NA NA ...
## .. ..$ Intercept.repl : int [1:28678] 1 NA NA NA NA NA NA NA NA NA ...
## .. ..$ SpeedLimit : num [1:28678] NA 1 NA NA NA NA NA NA NA NA ...
## .. ..$ SpeedLimit.group : int [1:28678] NA 1 NA NA NA NA NA NA NA NA ...
## .. ..$ SpeedLimit.repl : int [1:28678] NA 1 NA NA NA NA NA NA NA NA ...
## .. ..$ field : int [1:28678] NA NA 1 2 3 4 5 6 7 8 ...
## .. ..$ field.group : int [1:28678] NA NA 1 1 1 1 1 1 1 1 ...
## .. ..$ field.repl : int [1:28678] NA NA 1 1 1 1 1 1 1 1 ...
## .. ..$ BRU_Intercept_main_model : chr "linear"
## .. ..$ BRU_Intercept_values : num 1
## .. ..$ BRU_SpeedLimit_main_model: chr "linear"
## .. ..$ BRU_SpeedLimit_values : num 1
## .. ..$ BRU_field_main_model :List of 21
## .. .. ..$ f :List of 3
## .. .. .. ..$ model : chr "cgeneric"
## .. .. .. ..$ n : int 7169
## .. .. .. ..$ cgeneric:List of 5
## .. .. .. .. ..$ model: chr "inla_cgeneric_rspde_nonstat_int_model"
## .. .. .. .. ..$ shlib: chr "/home/rierasl/R/x86_64-pc-linux-gnu-library/4.4/INLA/bin/linux/64bit/external/rSPDE/librSPDE.so"
## .. .. .. .. ..$ n : int 7169
## .. .. .. .. ..$ debug: logi FALSE
## .. .. .. .. ..$ data :List of 5
## .. .. .. .. .. ..$ ints :List of 5
## .. .. .. .. .. .. ..$ n : int 7169
## .. .. .. .. .. .. ..$ debug : int 0
## .. .. .. .. .. .. ..$ graph_opt_i: int [1:16024] 0 0 0 1 1 1 1 1 1 2 ...
## .. .. .. .. .. .. ..$ graph_opt_j: int [1:16024] 0 1 985 1 1700 5207 5364 6858 7041 2 ...
## .. .. .. .. .. .. ..$ alpha : int 1
## .. .. .. .. .. ..$ doubles :List of 2
## .. .. .. .. .. .. ..$ start.theta : num [1:4] -0.3344 -0.0286 0 0
## .. .. .. .. .. .. ..$ theta.prior.mean: num [1:4] -0.3344 -0.0286 0 0
## .. .. .. .. .. ..$ characters:List of 3
## .. .. .. .. .. .. ..$ model : chr "inla_cgeneric_rspde_nonstat_int_model"
## .. .. .. .. .. .. ..$ shlib : chr "/home/rierasl/R/x86_64-pc-linux-gnu-library/4.4/INLA/bin/linux/64bit/external/rSPDE/librSPDE.so"
## .. .. .. .. .. .. ..$ prior.theta.param: chr "theta"
## .. .. .. .. .. ..$ matrices :List of 3
## .. .. .. .. .. .. ..$ B_tau : num [1:35847] 7169 5 -0.693 -1 0.5 ...
## .. .. .. .. .. .. ..$ B_kappa : num [1:35847] 7169 5 0.693 0 -1 ...
## .. .. .. .. .. .. ..$ theta.prior.prec: num [1:18] 4 4 0.1 0 0 0 0 0.1 0 0 ...
## .. .. .. .. .. ..$ smatrices :List of 2
## .. .. .. .. .. .. ..$ C: num [1:21510] 7169 7169 7169 0 1 ...
## .. .. .. .. .. .. ..$ G: num [1:74640] 7169 7169 24879 0 1 ...
## .. .. .. .. ..- attr(*, "class")= chr "inla.cgeneric"
## .. .. ..$ cgeneric_type : chr "int_alpha"
## .. .. ..$ nu : num 0.5
## .. .. ..$ theta.prior.mean : num [1:4] -0.3344 -0.0286 0 0
## .. .. ..$ prior.nu :List of 4
## .. .. .. ..$ loglocation: num -5e-06
## .. .. .. ..$ mean : num 1
## .. .. .. ..$ prec : num 3
## .. .. .. ..$ logscale : num 1
## .. .. ..$ theta.prior.prec : num [1:4, 1:4] 0.1 0 0 0 0 0.1 0 0 0 0 ...
## .. .. ..$ start.nu : num 0.5
## .. .. ..$ integer.nu : logi TRUE
## .. .. ..$ start.theta : num [1:4] -0.3344 -0.0286 0 0
## .. .. ..$ stationary : logi FALSE
## .. .. ..$ rspde.order : num 2
## .. .. ..$ dim : num 1
## .. .. ..$ est_nu : logi FALSE
## .. .. ..$ nu.upper.bound : num 2
## .. .. ..$ prior.nu.dist : chr "lognormal"
## .. .. ..$ debug : logi FALSE
## .. .. ..$ type.rational.approx: chr "chebfun"
## .. .. ..$ mesh :Classes 'metric_graph', 'R6' <metric_graph>
## Public:
## add_mesh_observations: function (data = NULL, group = NULL)
## add_observations: function (data = NULL, edge_number = "edge_number", distance_on_edge = "distance_on_edge",
## build_mesh: function (h = NULL, n = NULL, continuous = TRUE, continuous.outs = FALSE,
## buildC: function (alpha = 2, edge_constraint = FALSE)
## buildDirectionalConstraints: function (alpha = 1)
## C: NULL
## characteristics: list
## check_distance_consistency: function ()
## check_euclidean: function ()
## clear_observations: function ()
## clone: function (deep = FALSE)
## CoB: NULL
## compute_characteristics: function (check_euclidean = FALSE)
## compute_fem: function (petrov = FALSE)
## compute_geodist: function (full = FALSE, obs = TRUE, group = NULL, verbose = 0)
## compute_geodist_mesh: function ()
## compute_geodist_PtE: function (PtE, normalized = TRUE, include_vertices = TRUE, verbose = 0)
## compute_laplacian: function (full = FALSE, obs = TRUE, group = NULL, verbose = 0)
## compute_PtE_edges: function ()
## compute_resdist: function (full = FALSE, obs = TRUE, group = NULL, check_euclidean = FALSE,
## compute_resdist_mesh: function ()
## compute_resdist_PtE: function (PtE, normalized = TRUE, include_vertices = FALSE, check_euclidean = FALSE,
## coordinates: function (PtE = NULL, XY = NULL, normalized = TRUE)
## drop_na: function (...)
## E: 1 3 3 6 4 7 9 11 13 14 15 16 18 19 20 21 23 25 27 29 31 ...
## edge_lengths: 0.0363234139144278 0.01586106867077 0.027923568765887 0. ...
## edges: metric_graph_edges
## edgeweight_to_data: function (loc = NULL, mesh = FALSE, data_loc = FALSE, weight_col = NULL,
## fem_basis: function (PtE)
## filter: function (..., .drop_na = FALSE, .drop_all_na = TRUE)
## geo_dist: list
## get_data: function (group = NULL, tibble = TRUE, drop_na = FALSE, drop_all_na = TRUE)
## get_degrees: function (which = "degree")
## get_edge_lengths: function (unit = NULL)
## get_edge_weights: function (data.frame = FALSE, tibble = TRUE)
## get_groups: function (get_cols = FALSE)
## get_initial_graph: function ()
## get_locations: function ()
## get_mesh_locations: function (bru = FALSE, loc = NULL, normalized = TRUE)
## get_PtE: function ()
## get_vertices_incomp_dir: function ()
## initialize: function (edges = NULL, V = NULL, E = NULL, vertex_unit = NULL,
## is_tree: function ()
## Laplacian: NULL
## mesh: list
## mesh_A: function (PtE)
## mutate: function (..., .drop_na = FALSE, .drop_all_na = TRUE)
## nE: 6827
## nV: 4017
## observation_to_vertex: function (tolerance = 1e-15, mesh_warning = TRUE)
## plot: function (data = NULL, newdata = NULL, group = 1, plotly = FALSE,
## plot_connections: function ()
## plot_function: function (data = NULL, newdata = NULL, group = 1, X = NULL, plotly = FALSE,
## plot_movie: function (X, plotly = TRUE, vertex_size = 5, vertex_color = "black",
## print: function ()
## process_data: function (data = NULL, edge_number = "edge_number", distance_on_edge = "distance_on_edge",
## prune_vertices: function (check_weights = TRUE, verbose = FALSE)
## PtV: NULL
## res_dist: NULL
## select: function (..., .drop_na = FALSE, .drop_all_na = TRUE)
## set_edge_weights: function (weights = rep(1, self$nE), kirchhoff_weights = NULL)
## summarise: function (..., .include_graph_groups = FALSE, .groups = NULL,
## summary: function (messages = FALSE, compute_characteristics = TRUE, check_euclidean = TRUE,
## V: -122.41277 -122.41249 -122.40376 -122.40358 -122.40379 - ...
## vertices: metric_graph_vertices
## VtEfirst: function ()
## Private:
## A: function (group = NULL, obs_to_vert = FALSE, drop_na = FALSE,
## add_vertices: function (PtE, tolerance = 1e-10, verbose)
## addinfo: FALSE
## clear_initial_info: function ()
## compute_degrees: function ()
## compute_laplacian_PtE: function (PtE, normalized = TRUE, verbose = verbose)
## compute_lengths: function (longlat, unit, crs, proj4string, which_longlat, vertex_unit,
## connected: TRUE
## coordinates_multiple_snaps: function (XY, tolerance, verbose = verbose, crs, proj4string,
## create_update_vertices: function ()
## crs: crs
## data: metric_graph_data, list
## edge_weights: tbl_df, tbl, data.frame
## find_edge_edge_points: function (tol, verbose, crs, proj4string, longlat, fact, which_longlat)
## find_mesh_bc: function ()
## get_edge_weights_internal: function (data.frame = FALSE)
## group_col: .group
## initial_edges_added: NULL
## initial_graph: metric_graph, R6
## kirchhoff_weights: NULL
## length_unit: km
## line_to_vertex: function (tolerance = 0, longlat = FALSE, fact, verbose, crs,
## longlat: TRUE
## merge_close_vertices: function (tolerance, fact)
## merge.all.deg2: function ()
## mesh_merge_deg2: function ()
## mesh_merge_outs: function ()
## move_V_first: function ()
## plot_2d: function (line_width = 0.1, marker_size = 1, vertex_color = "black",
## plot_3d: function (line_width = 1, marker_size = 1, vertex_color = "rgb(0,0,0)",
## proj4string: NULL
## prune_warning: FALSE
## pruned: FALSE
## PtE_to_mesh: function (PtE)
## ref_edges: 1 1552 2 5 3133 4 6 395 7 526 8 6466 9 10 11 12 38 13 14 ...
## remove_circles: function (threshold, verbose, longlat, unit, crs, proj4string,
## remove.first.deg2: function (res)
## set_first_weights: function (weights = rep(1, self$nE))
## set_petrov_matrices: function ()
## split_edge: function (Ei, t, tolerance = 0)
## temp_PtE: NULL
## tolerance: list
## transform: FALSE
## vertex_unit: degrees
## which_longlat: sf
## .. .. ..$ fem_mesh :List of 4
## .. .. .. ..$ c0:Formal class 'dgTMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:7169] 0 1 2 3 4 5 6 7 8 9 ...
## .. .. .. .. .. ..@ j : int [1:7169] 0 1 2 3 4 5 6 7 8 9 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 7169 7169
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:7169] 0.0797 0.1564 0.1117 0.0493 0.0614 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ g1:Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:24879] 0 1 985 0 1 1700 5207 5364 6858 7041 ...
## .. .. .. .. .. ..@ p : int [1:7170] 0 3 10 16 20 23 27 36 44 50 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 7169 7169
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:24879] 101.1 -55.1 -46.1 -55.1 216.4 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ g2:Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:56007] 0 1 985 986 1700 4722 5207 5364 6240 6858 ...
## .. .. .. .. .. ..@ p : int [1:7170] 0 11 22 34 43 52 61 76 89 99 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 7169 7169
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:56007] 172097 -145986 -232979 119006 15770 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. .. ..$ g3:Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. ..@ i : int [1:96755] 0 1 230 984 985 986 1700 1701 2280 2455 ...
## .. .. .. .. .. ..@ p : int [1:7170] 0 17 35 57 76 91 103 126 150 166 ...
## .. .. .. .. .. ..@ Dim : int [1:2] 7169 7169
## .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. ..@ x : num [1:96755] 3.94e+08 -3.74e+08 -2.65e+07 -9.14e+07 -1.47e+09 ...
## .. .. .. .. .. ..@ factors : list()
## .. .. ..$ parameterization : chr "matern"
## .. .. ..$ n.spde : int 7169
## .. .. ..- attr(*, "class")= chr [1:3] "rspde_metric_graph" "inla_rspde" "inla.cgeneric"
## .. ..$ BRU_field_values : int [1:7169] 1 2 3 4 5 6 7 8 9 10 ...
## ..$ quantiles : num [1:3] 0.025 0.5 0.975
## ..$ E : num [1:14535] 1 1 1 1 1 1 1 1 1 1 ...
## ..$ offset : num [1:14535] 0 0 0 0 0 0 0 0 0 0 ...
## ..$ scale : num [1:14535] 1 1 1 1 1 1 1 1 1 1 ...
## ..$ weights : num [1:14535] 1 1 1 1 1 1 1 1 1 1 ...
## ..$ Ntrials : num [1:14535] 1 1 1 1 1 1 1 1 1 1 ...
## ..$ verbose : logi FALSE
## ..$ control.compute :List of 18
## .. ..$ openmp.strategy : chr "default"
## .. ..$ hyperpar : logi TRUE
## .. ..$ return.marginals : logi TRUE
## .. ..$ return.marginals.predictor: logi FALSE
## .. ..$ dic : logi TRUE
## .. ..$ mlik : logi TRUE
## .. ..$ cpo : logi FALSE
## .. ..$ po : logi FALSE
## .. ..$ waic : logi TRUE
## .. ..$ residuals : logi FALSE
## .. ..$ q : logi FALSE
## .. ..$ config : logi TRUE
## .. ..$ likelihood.info : logi FALSE
## .. ..$ smtp : NULL
## .. ..$ graph : logi FALSE
## .. ..$ internal.opt : NULL
## .. ..$ save.memory : NULL
## .. ..$ control.gcpo :List of 16
## .. .. ..$ enable : logi FALSE
## .. .. ..$ num.level.sets : num -1
## .. .. ..$ size.max : num 32
## .. .. ..$ strategy : chr [1:2] "posterior" "prior"
## .. .. ..$ groups : NULL
## .. .. ..$ selection : NULL
## .. .. ..$ group.selection : NULL
## .. .. ..$ friends : NULL
## .. .. ..$ weights : NULL
## .. .. ..$ verbose : logi FALSE
## .. .. ..$ epsilon : num 0.005
## .. .. ..$ prior.diagonal : num 1e-04
## .. .. ..$ correct.hyperpar: logi TRUE
## .. .. ..$ keep : NULL
## .. .. ..$ remove : NULL
## .. .. ..$ remove.fixed : logi TRUE
## .. .. ..- attr(*, "class")= chr [1:2] "ctrl_gcpo" "inla_ctrl_object"
## .. ..- attr(*, "class")= chr [1:2] "ctrl_compute" "inla_ctrl_object"
## ..$ control.predictor:List of 12
## .. ..$ hyper :List of 1
## .. .. ..$ theta:List of 9
## .. .. .. ..$ hyperid : num 53001
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "log precision"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name: chr "prec"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 13.8
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi TRUE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "loggamma"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1e+00 1e-05
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta:function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. ..$ fixed : NULL
## .. ..$ prior : NULL
## .. ..$ param : NULL
## .. ..$ initial : NULL
## .. ..$ compute : logi TRUE
## .. ..$ cdf : NULL
## .. ..$ quantiles: NULL
## .. ..$ cross : NULL
## .. ..$ A :Formal class 'dgTMatrix' [package "Matrix"] with 6 slots
## .. .. .. ..@ i : int [1:58126] 0 1 2 3 4 5 6 7 8 9 ...
## .. .. .. ..@ j : int [1:58126] 0 0 0 0 0 0 0 0 0 0 ...
## .. .. .. ..@ Dim : int [1:2] 14535 28678
## .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. ..$ : NULL
## .. .. .. .. ..$ : NULL
## .. .. .. ..@ x : num [1:58126] 1 1 1 1 1 1 1 1 1 1 ...
## .. .. .. ..@ factors : list()
## .. ..$ precision: num 3269017
## .. ..$ link : NULL
## .. ..- attr(*, "class")= chr [1:2] "ctrl_predictor" "inla_ctrl_object"
## ..$ control.family :List of 1
## .. ..$ :List of 17
## .. .. ..$ dummy : num 0
## .. .. ..$ hyper :List of 1
## .. .. .. ..$ theta:List of 11
## .. .. .. .. ..$ hyperid : num 63001
## .. .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. .. ..$ name : chr "size"
## .. .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. .. ..$ short.name : chr "size"
## .. .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. .. ..$ output.name : chr "size for the nbinomial observations (1/overdispersion)"
## .. .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. .. ..$ output.name.intern: chr "log size for the nbinomial observations (1/overdispersion)"
## .. .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. .. ..$ initial : num 2.3
## .. .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. .. ..$ prior : chr "pc.mgamma"
## .. .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. .. ..$ param : num 7
## .. .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. .. ..$ to.theta :function (x)
## .. .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. .. ..$ from.theta :function (x)
## .. .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ initial : NULL
## .. .. ..$ prior : NULL
## .. .. ..$ param : NULL
## .. .. ..$ fixed : NULL
## .. .. ..$ link : chr "default"
## .. .. ..$ sn.shape.max : num 5
## .. .. ..$ gev.scale.xi : num 0.1
## .. .. ..$ control.bgev : NULL
## .. .. ..$ cenpoisson.I : int [1:2] -1 -1
## .. .. ..$ beta.censor.value: num 0
## .. .. ..$ variant : int 0
## .. .. ..$ control.mix : NULL
## .. .. ..$ control.pom : NULL
## .. .. ..$ control.link :List of 10
## .. .. .. ..$ model : chr "default"
## .. .. .. ..$ order : NULL
## .. .. .. ..$ variant : NULL
## .. .. .. ..$ hyper : list()
## .. .. .. ..$ quantile: NULL
## .. .. .. ..$ a : num 1
## .. .. .. ..$ initial : NULL
## .. .. .. ..$ fixed : NULL
## .. .. .. ..$ prior : NULL
## .. .. .. ..$ param : NULL
## .. .. .. ..- attr(*, "class")= chr [1:2] "ctrl_link" "inla_ctrl_object"
## .. .. ..$ link.simple : chr "default"
## .. .. ..- attr(*, "class")= chr [1:2] "ctrl_family" "inla_ctrl_object"
## ..$ control.inla :List of 56
## .. ..$ strategy : chr "auto"
## .. ..$ int.strategy : chr "auto"
## .. ..$ int.design : NULL
## .. ..$ interpolator : chr "auto"
## .. ..$ fast : logi TRUE
## .. ..$ linear.correction : NULL
## .. ..$ h : num 0.005
## .. ..$ dz : num 0.75
## .. ..$ diff.logdens : num 6
## .. ..$ print.joint.hyper : logi TRUE
## .. ..$ force.diagonal : logi FALSE
## .. ..$ skip.configurations : logi TRUE
## .. ..$ mode.known : logi FALSE
## .. ..$ adjust.weights : logi TRUE
## .. ..$ tolerance : num 0.005
## .. ..$ tolerance.f : NULL
## .. ..$ tolerance.g : NULL
## .. ..$ tolerance.x : NULL
## .. ..$ tolerance.step : NULL
## .. ..$ restart : int 0
## .. ..$ optimiser : chr "default"
## .. ..$ verbose : NULL
## .. ..$ reordering : chr "auto"
## .. ..$ cpo.diff : NULL
## .. ..$ npoints : num 9
## .. ..$ cutoff : num 1e-04
## .. ..$ adapt.hessian.mode : NULL
## .. ..$ adapt.hessian.max.trials : NULL
## .. ..$ adapt.hessian.scale : NULL
## .. ..$ adaptive.max : int 25
## .. ..$ huge : logi FALSE
## .. ..$ step.len : num 0
## .. ..$ stencil : int 5
## .. ..$ lincomb.derived.correlation.matrix: logi FALSE
## .. ..$ diagonal : num 0
## .. ..$ numint.maxfeval : num 1e+05
## .. ..$ numint.relerr : num 1e-05
## .. ..$ numint.abserr : num 1e-06
## .. ..$ cmin : num -Inf
## .. ..$ b.strategy : chr "keep"
## .. ..$ step.factor : num -0.1
## .. ..$ global.node.factor : num 2
## .. ..$ global.node.degree : int 2147483647
## .. ..$ stupid.search : logi TRUE
## .. ..$ stupid.search.max.iter : int 1000
## .. ..$ stupid.search.factor : num 1.05
## .. ..$ control.vb :List of 8
## .. .. ..$ enable : chr "auto"
## .. .. ..$ strategy : chr [1:2] "mean" "variance"
## .. .. ..$ verbose : logi TRUE
## .. .. ..$ iter.max : num 25
## .. .. ..$ emergency : num 25
## .. .. ..$ f.enable.limit : num [1:4] 30 25 1024 768
## .. .. ..$ hessian.update : num 2
## .. .. ..$ hessian.strategy: chr [1:4] "default" "full" "partial" "diagonal"
## .. .. ..- attr(*, "class")= chr [1:2] "ctrl_vb" "inla_ctrl_object"
## .. ..$ num.gradient : chr "central"
## .. ..$ num.hessian : chr "central"
## .. ..$ optimise.strategy : chr "smart"
## .. ..$ use.directions : logi TRUE
## .. ..$ constr.marginal.diagonal : num 1.49e-08
## .. ..$ improved.simplified.laplace : logi FALSE
## .. ..$ parallel.linesearch : logi FALSE
## .. ..$ compute.initial.values : logi TRUE
## .. ..$ hessian.correct.skewness.only : logi TRUE
## .. ..- attr(*, "class")= chr [1:2] "ctrl_inla" "inla_ctrl_object"
## ..$ control.fixed :List of 10
## .. ..$ cdf : NULL
## .. ..$ quantiles : NULL
## .. ..$ expand.factor.strategy: chr "inla"
## .. ..$ mean : num 0
## .. ..$ mean.intercept : num 0
## .. ..$ prec : num 0.001
## .. ..$ prec.intercept : num 0
## .. ..$ compute : logi TRUE
## .. ..$ correlation.matrix : logi FALSE
## .. ..$ remove.names : NULL
## .. ..- attr(*, "class")= chr [1:2] "ctrl_fixed" "inla_ctrl_object"
## ..$ control.mode :List of 5
## .. ..$ result : NULL
## .. ..$ theta : NULL
## .. ..$ x : NULL
## .. ..$ restart: logi FALSE
## .. ..$ fixed : logi FALSE
## .. ..- attr(*, "class")= chr [1:2] "ctrl_mode" "inla_ctrl_object"
## ..$ control.expert :List of 6
## .. ..$ cpo.manual : logi FALSE
## .. ..$ cpo.idx : num -1
## .. ..$ disable.gaussian.check: logi FALSE
## .. ..$ jp : NULL
## .. ..$ dot.product.gain : logi FALSE
## .. ..$ globalconstr :List of 2
## .. .. ..$ A: NULL
## .. .. ..$ e: NULL
## .. ..- attr(*, "class")= chr [1:2] "ctrl_expert" "inla_ctrl_object"
## ..$ control.lincomb :List of 1
## .. ..$ verbose: logi FALSE
## .. ..- attr(*, "class")= chr [1:2] "ctrl_lincomb" "inla_ctrl_object"
## ..$ control.update :List of 1
## .. ..$ result: NULL
## .. ..- attr(*, "class")= chr [1:2] "ctrl_update" "inla_ctrl_object"
## ..$ control.lp.scale :List of 1
## .. ..$ hyper:List of 100
## .. .. ..$ theta1 :List of 11
## .. .. .. ..$ hyperid : num 103001
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta1"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b1"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[1] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[1] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta2 :List of 11
## .. .. .. ..$ hyperid : num 103002
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta2"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b2"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[2] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[2] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta3 :List of 11
## .. .. .. ..$ hyperid : num 103003
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta3"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b3"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[3] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[3] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta4 :List of 11
## .. .. .. ..$ hyperid : num 103004
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta4"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b4"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[4] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[4] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta5 :List of 11
## .. .. .. ..$ hyperid : num 103005
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta5"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b5"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[5] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[5] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta6 :List of 11
## .. .. .. ..$ hyperid : num 103006
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta6"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b6"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[6] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[6] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta7 :List of 11
## .. .. .. ..$ hyperid : num 103007
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta7"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b7"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[7] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[7] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta8 :List of 11
## .. .. .. ..$ hyperid : num 103008
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta8"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b8"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[8] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[8] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta9 :List of 11
## .. .. .. ..$ hyperid : num 103009
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta9"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b9"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[9] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[9] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta10 :List of 11
## .. .. .. ..$ hyperid : num 103010
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta10"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b10"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[10] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[10] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta11 :List of 11
## .. .. .. ..$ hyperid : num 103011
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta11"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b11"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[11] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[11] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta12 :List of 11
## .. .. .. ..$ hyperid : num 103012
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta12"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b12"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[12] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[12] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta13 :List of 11
## .. .. .. ..$ hyperid : num 103013
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta13"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b13"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[13] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[13] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta14 :List of 11
## .. .. .. ..$ hyperid : num 103014
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta14"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b14"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[14] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[14] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta15 :List of 11
## .. .. .. ..$ hyperid : num 103015
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta15"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b15"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[15] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[15] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta16 :List of 11
## .. .. .. ..$ hyperid : num 103016
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta16"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b16"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[16] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[16] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta17 :List of 11
## .. .. .. ..$ hyperid : num 103017
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta17"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b17"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[17] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[17] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta18 :List of 11
## .. .. .. ..$ hyperid : num 103018
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta18"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b18"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[18] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[18] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta19 :List of 11
## .. .. .. ..$ hyperid : num 103019
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta19"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b19"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[19] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[19] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta20 :List of 11
## .. .. .. ..$ hyperid : num 103020
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta20"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b20"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[20] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[20] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta21 :List of 11
## .. .. .. ..$ hyperid : num 103021
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta21"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b21"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[21] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[21] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta22 :List of 11
## .. .. .. ..$ hyperid : num 103022
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta22"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b22"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[22] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[22] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta23 :List of 11
## .. .. .. ..$ hyperid : num 103023
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta23"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b23"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[23] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[23] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta24 :List of 11
## .. .. .. ..$ hyperid : num 103024
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta24"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b24"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[24] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[24] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta25 :List of 11
## .. .. .. ..$ hyperid : num 103025
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta25"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b25"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[25] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[25] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta26 :List of 11
## .. .. .. ..$ hyperid : num 103026
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta26"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b26"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[26] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[26] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta27 :List of 11
## .. .. .. ..$ hyperid : num 103027
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta27"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b27"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[27] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[27] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta28 :List of 11
## .. .. .. ..$ hyperid : num 103028
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta28"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b28"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[28] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[28] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta29 :List of 11
## .. .. .. ..$ hyperid : num 103029
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta29"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b29"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[29] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[29] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta30 :List of 11
## .. .. .. ..$ hyperid : num 103030
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta30"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b30"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[30] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[30] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta31 :List of 11
## .. .. .. ..$ hyperid : num 103031
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta31"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b31"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[31] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[31] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta32 :List of 11
## .. .. .. ..$ hyperid : num 103032
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta32"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b32"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[32] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[32] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta33 :List of 11
## .. .. .. ..$ hyperid : num 103033
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta33"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b33"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[33] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[33] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta34 :List of 11
## .. .. .. ..$ hyperid : num 103034
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta34"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b34"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[34] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[34] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta35 :List of 11
## .. .. .. ..$ hyperid : num 103035
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta35"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b35"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[35] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[35] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta36 :List of 11
## .. .. .. ..$ hyperid : num 103036
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta36"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b36"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[36] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[36] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta37 :List of 11
## .. .. .. ..$ hyperid : num 103037
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta37"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b37"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[37] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[37] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta38 :List of 11
## .. .. .. ..$ hyperid : num 103038
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta38"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b38"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[38] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[38] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta39 :List of 11
## .. .. .. ..$ hyperid : num 103039
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta39"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b39"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[39] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[39] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta40 :List of 11
## .. .. .. ..$ hyperid : num 103040
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta40"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b40"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[40] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[40] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta41 :List of 11
## .. .. .. ..$ hyperid : num 103041
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta41"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b41"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[41] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[41] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta42 :List of 11
## .. .. .. ..$ hyperid : num 103042
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta42"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b42"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[42] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[42] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta43 :List of 11
## .. .. .. ..$ hyperid : num 103043
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta43"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b43"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[43] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[43] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta44 :List of 11
## .. .. .. ..$ hyperid : num 103044
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta44"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b44"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[44] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[44] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta45 :List of 11
## .. .. .. ..$ hyperid : num 103045
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta45"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b45"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[45] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[45] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta46 :List of 11
## .. .. .. ..$ hyperid : num 103046
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta46"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b46"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[46] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[46] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta47 :List of 11
## .. .. .. ..$ hyperid : num 103047
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta47"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b47"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[47] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[47] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta48 :List of 11
## .. .. .. ..$ hyperid : num 103048
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta48"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b48"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[48] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[48] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta49 :List of 11
## .. .. .. ..$ hyperid : num 103049
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta49"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b49"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[49] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[49] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta50 :List of 11
## .. .. .. ..$ hyperid : num 103050
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta50"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b50"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[50] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[50] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta51 :List of 11
## .. .. .. ..$ hyperid : num 103051
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta51"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b51"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[51] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[51] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta52 :List of 11
## .. .. .. ..$ hyperid : num 103052
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta52"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b52"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[52] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[52] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta53 :List of 11
## .. .. .. ..$ hyperid : num 103053
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta53"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b53"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[53] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[53] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta54 :List of 11
## .. .. .. ..$ hyperid : num 103054
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta54"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b54"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[54] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[54] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta55 :List of 11
## .. .. .. ..$ hyperid : num 103055
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta55"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b55"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[55] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[55] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta56 :List of 11
## .. .. .. ..$ hyperid : num 103056
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta56"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b56"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[56] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[56] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta57 :List of 11
## .. .. .. ..$ hyperid : num 103057
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta57"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b57"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[57] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[57] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta58 :List of 11
## .. .. .. ..$ hyperid : num 103058
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta58"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b58"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[58] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[58] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta59 :List of 11
## .. .. .. ..$ hyperid : num 103059
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta59"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b59"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[59] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[59] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta60 :List of 11
## .. .. .. ..$ hyperid : num 103060
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta60"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b60"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[60] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[60] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta61 :List of 11
## .. .. .. ..$ hyperid : num 103061
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta61"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b61"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[61] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[61] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta62 :List of 11
## .. .. .. ..$ hyperid : num 103062
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta62"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b62"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[62] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[62] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta63 :List of 11
## .. .. .. ..$ hyperid : num 103063
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta63"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b63"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[63] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[63] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta64 :List of 11
## .. .. .. ..$ hyperid : num 103064
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta64"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b64"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[64] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[64] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta65 :List of 11
## .. .. .. ..$ hyperid : num 103065
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta65"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b65"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[65] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[65] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta66 :List of 11
## .. .. .. ..$ hyperid : num 103066
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta66"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b66"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[66] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[66] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta67 :List of 11
## .. .. .. ..$ hyperid : num 103067
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta67"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b67"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[67] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[67] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta68 :List of 11
## .. .. .. ..$ hyperid : num 103068
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta68"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b68"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[68] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[68] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta69 :List of 11
## .. .. .. ..$ hyperid : num 103069
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta69"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b69"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[69] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[69] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta70 :List of 11
## .. .. .. ..$ hyperid : num 103070
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta70"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b70"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[70] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[70] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta71 :List of 11
## .. .. .. ..$ hyperid : num 103071
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta71"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b71"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[71] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[71] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta72 :List of 11
## .. .. .. ..$ hyperid : num 103072
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta72"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b72"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[72] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[72] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta73 :List of 11
## .. .. .. ..$ hyperid : num 103073
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta73"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b73"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[73] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[73] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta74 :List of 11
## .. .. .. ..$ hyperid : num 103074
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta74"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b74"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[74] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[74] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta75 :List of 11
## .. .. .. ..$ hyperid : num 103075
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta75"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b75"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[75] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[75] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta76 :List of 11
## .. .. .. ..$ hyperid : num 103076
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta76"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b76"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[76] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[76] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta77 :List of 11
## .. .. .. ..$ hyperid : num 103077
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta77"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b77"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[77] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[77] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta78 :List of 11
## .. .. .. ..$ hyperid : num 103078
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta78"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b78"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[78] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[78] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta79 :List of 11
## .. .. .. ..$ hyperid : num 103079
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta79"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b79"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[79] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[79] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta80 :List of 11
## .. .. .. ..$ hyperid : num 103080
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta80"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b80"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[80] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[80] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta81 :List of 11
## .. .. .. ..$ hyperid : num 103081
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta81"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b81"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[81] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[81] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta82 :List of 11
## .. .. .. ..$ hyperid : num 103082
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta82"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b82"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[82] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[82] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta83 :List of 11
## .. .. .. ..$ hyperid : num 103083
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta83"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b83"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[83] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[83] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta84 :List of 11
## .. .. .. ..$ hyperid : num 103084
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta84"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b84"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[84] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[84] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta85 :List of 11
## .. .. .. ..$ hyperid : num 103085
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta85"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b85"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[85] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[85] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta86 :List of 11
## .. .. .. ..$ hyperid : num 103086
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta86"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b86"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[86] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[86] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta87 :List of 11
## .. .. .. ..$ hyperid : num 103087
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta87"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b87"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[87] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[87] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta88 :List of 11
## .. .. .. ..$ hyperid : num 103088
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta88"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b88"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[88] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[88] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta89 :List of 11
## .. .. .. ..$ hyperid : num 103089
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta89"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b89"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[89] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[89] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta90 :List of 11
## .. .. .. ..$ hyperid : num 103090
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta90"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b90"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[90] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[90] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta91 :List of 11
## .. .. .. ..$ hyperid : num 103091
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta91"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b91"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[91] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[91] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta92 :List of 11
## .. .. .. ..$ hyperid : num 103092
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta92"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b92"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[92] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[92] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta93 :List of 11
## .. .. .. ..$ hyperid : num 103093
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta93"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b93"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[93] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[93] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta94 :List of 11
## .. .. .. ..$ hyperid : num 103094
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta94"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b94"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[94] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[94] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta95 :List of 11
## .. .. .. ..$ hyperid : num 103095
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta95"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b95"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[95] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[95] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta96 :List of 11
## .. .. .. ..$ hyperid : num 103096
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta96"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b96"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[96] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[96] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta97 :List of 11
## .. .. .. ..$ hyperid : num 103097
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta97"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b97"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[97] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[97] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta98 :List of 11
## .. .. .. ..$ hyperid : num 103098
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta98"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b98"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[98] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[98] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. ..$ theta99 :List of 11
## .. .. .. ..$ hyperid : num 103099
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ name : chr "beta99"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ short.name : chr "b99"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name : chr "beta[99] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ output.name.intern: chr "beta[99] for lp_scale"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ initial : num 1
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ fixed : logi FALSE
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ prior : chr "normal"
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ param : num [1:2] 1 10
## .. .. .. .. ..- attr(*, "inla.read.only")= logi FALSE
## .. .. .. ..$ to.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. ..$ from.theta :function (x)
## .. .. .. .. ..- attr(*, "inla.read.only")= logi TRUE
## .. .. .. [list output truncated]
## .. ..- attr(*, "class")= chr [1:2] "ctrl_lp_scale" "inla_ctrl_object"
## ..$ control.pardiso :List of 4
## .. ..$ verbose : logi FALSE
## .. ..$ debug : logi FALSE
## .. ..$ parallel.reordering: logi TRUE
## .. ..$ nrhs : num -1
## .. ..- attr(*, "class")= chr [1:2] "ctrl_pardiso" "inla_ctrl_object"
## ..$ only.hyperparam : logi FALSE
## ..$ inla.call : chr "/home/rierasl/R/x86_64-pc-linux-gnu-library/4.4/INLA/bin/linux/64bit/inla.mkl.run"
## ..$ num.threads : chr "24:1"
## ..$ keep : logi FALSE
## ..$ silent : logi TRUE
## ..$ inla.mode : chr "compact"
## ..$ safe : logi TRUE
## ..$ debug : logi FALSE
## ..$ .parent.frame :<environment: R_GlobalEnv>
## $ call : chr [1:14] "inla.core(formula = formula, family = family, contrasts = contrasts, " " data = data, quantiles = quantiles, E = E, offset = offset, " " scale = scale, weights = weights, Ntrials = Ntrials, strata = strata, " " lp.scale = lp.scale, link.covariates = link.covariates, verbose = verbose, " ...
## $ model.matrix :Formal class 'dsparseModelMatrix' [package "MatrixModels"] with 8 slots
## .. ..@ i : int(0)
## .. ..@ p : int 0
## .. ..@ Dim : int [1:2] 28678 0
## .. ..@ Dimnames :List of 2
## .. .. ..$ : chr [1:28678] "1" "2" "3" "4" ...
## .. .. ..$ : NULL
## .. ..@ x : num(0)
## .. ..@ factors : list()
## .. ..@ assign : int(0)
## .. ..@ contrasts: Named list()
## $ bru_iinla :List of 5
## ..$ log :Class 'bru_log' hidden list of 2
## .. ..$ log : chr [1:7] "2024-05-05 14:35:36.7253: iinla: Evaluate component inputs" "2024-05-05 14:35:36.790714: iinla: Evaluate component linearisations" "2024-05-05 14:35:39.95437: iinla: Evaluate component simplifications" "2024-05-05 14:35:43.053505: iinla: Evaluate predictor linearisation" ...
## .. ..$ bookmarks: Named int 0
## .. .. ..- attr(*, "names")= chr "iinla"
## ..$ states :List of 1
## .. ..$ :List of 3
## .. .. ..$ Intercept : num 0
## .. .. ..$ SpeedLimit: num 0
## .. .. ..$ field : num [1:28676] 0 0 0 0 0 0 0 0 0 0 ...
## ..$ inla_stack:List of 3
## .. ..$ A :Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. ..@ i : int [1:58126] 0 1 2 3 4 5 6 7 8 9 ...
## .. .. .. ..@ p : int [1:28679] 0 14535 29070 29074 29081 29081 29081 29081 29082 29083 ...
## .. .. .. ..@ Dim : int [1:2] 14535 28678
## .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. ..$ : NULL
## .. .. .. .. ..$ : NULL
## .. .. .. ..@ x : num [1:58126] 1 1 1 1 1 1 1 1 1 1 ...
## .. .. .. ..@ factors : list()
## .. ..$ data :List of 5
## .. .. ..$ data :'data.frame': 14535 obs. of 6 variables:
## .. .. .. ..$ BRU.response: num [1:14535] 0 12 24 32 0 19 22 19 30 14 ...
## .. .. .. ..$ BRU.E : num [1:14535] 1 1 1 1 1 1 1 1 1 1 ...
## .. .. .. ..$ BRU.Ntrials : num [1:14535] 1 1 1 1 1 1 1 1 1 1 ...
## .. .. .. ..$ BRU.weights : num [1:14535] 1 1 1 1 1 1 1 1 1 1 ...
## .. .. .. ..$ BRU.scale : num [1:14535] 1 1 1 1 1 1 1 1 1 1 ...
## .. .. .. ..$ BRU.offset : num [1:14535] 0 0 0 0 0 0 0 0 0 0 ...
## .. .. ..$ nrow : int 14535
## .. .. ..$ ncol : Named int [1:6] 1 1 1 1 1 1
## .. .. .. ..- attr(*, "names")= chr [1:6] "BRU.response" "BRU.E" "BRU.Ntrials" "BRU.weights" ...
## .. .. ..$ names:List of 6
## .. .. .. ..$ BRU.response: chr "BRU.response"
## .. .. .. ..$ BRU.E : chr "BRU.E"
## .. .. .. ..$ BRU.Ntrials : chr "BRU.Ntrials"
## .. .. .. ..$ BRU.weights : chr "BRU.weights"
## .. .. .. ..$ BRU.scale : chr "BRU.scale"
## .. .. .. ..$ BRU.offset : chr "BRU.offset"
## .. .. ..$ index:List of 1
## .. .. .. ..$ : num [1:14535] 1 2 3 4 5 6 7 8 9 10 ...
## .. .. ..- attr(*, "class")= chr "inla.data.stack.info"
## .. ..$ effects:List of 5
## .. .. ..$ data :'data.frame': 28678 obs. of 9 variables:
## .. .. .. ..$ Intercept : num [1:28678] 1 NA NA NA NA NA NA NA NA NA ...
## .. .. .. ..$ Intercept.group : int [1:28678] 1 NA NA NA NA NA NA NA NA NA ...
## .. .. .. ..$ Intercept.repl : int [1:28678] 1 NA NA NA NA NA NA NA NA NA ...
## .. .. .. ..$ SpeedLimit : num [1:28678] NA 1 NA NA NA NA NA NA NA NA ...
## .. .. .. ..$ SpeedLimit.group: int [1:28678] NA 1 NA NA NA NA NA NA NA NA ...
## .. .. .. ..$ SpeedLimit.repl : int [1:28678] NA 1 NA NA NA NA NA NA NA NA ...
## .. .. .. ..$ field : int [1:28678] NA NA 1 2 3 4 5 6 7 8 ...
## .. .. .. ..$ field.group : int [1:28678] NA NA 1 1 1 1 1 1 1 1 ...
## .. .. .. ..$ field.repl : int [1:28678] NA NA 1 1 1 1 1 1 1 1 ...
## .. .. ..$ nrow : int 28678
## .. .. ..$ ncol : Named int [1:9] 1 1 1 1 1 1 1 1 1
## .. .. .. ..- attr(*, "names")= chr [1:9] "Intercept" "Intercept.group" "Intercept.repl" "SpeedLimit" ...
## .. .. ..$ names:List of 9
## .. .. .. ..$ Intercept : chr "Intercept"
## .. .. .. ..$ Intercept.group : chr "Intercept.group"
## .. .. .. ..$ Intercept.repl : chr "Intercept.repl"
## .. .. .. ..$ SpeedLimit : chr "SpeedLimit"
## .. .. .. ..$ SpeedLimit.group: chr "SpeedLimit.group"
## .. .. .. ..$ SpeedLimit.repl : chr "SpeedLimit.repl"
## .. .. .. ..$ field : chr "field"
## .. .. .. ..$ field.group : chr "field.group"
## .. .. .. ..$ field.repl : chr "field.repl"
## .. .. ..$ index:List of 3
## .. .. .. ..$ : int 1
## .. .. .. ..$ : int 2
## .. .. .. ..$ : int [1:28676] 3 4 5 6 7 8 9 10 11 12 ...
## .. .. ..- attr(*, "class")= chr "inla.data.stack.info"
## .. ..- attr(*, "class")= chr "inla.data.stack"
## ..$ track :'data.frame': 28684 obs. of 6 variables:
## .. ..$ effect : chr [1:28684] "Intercept" "SpeedLimit" "field" "field" ...
## .. ..$ index : num [1:28684] 1 1 1 2 3 4 5 6 7 8 ...
## .. ..$ iteration : num [1:28684] 1 1 1 1 1 1 1 1 1 1 ...
## .. ..$ mode : num [1:28684] 2.91186 0.116 0.07428 0.01501 0.00566 ...
## .. ..$ sd : num [1:28684] 0.0226 0.0107 0.1881 0.1603 0.2032 ...
## .. ..$ new_linearisation: num [1:28684] 0 0 0 0 0 0 0 0 0 0 ...
## ..$ timings :'data.frame': 2 obs. of 3 variables:
## .. ..$ Task : chr [1:2] "Preprocess" "Run inla()"
## .. ..$ Iteration: num [1:2] 1 1
## .. ..$ Time : 'difftime' num [1:2] 22.3165948390961 9.7177050113678
## .. .. ..- attr(*, "units")= chr "secs"
## $ bru_timings :'data.frame': 3 obs. of 3 variables:
## ..$ Task : chr [1:3] "Preprocess" "Preprocess" "Run inla()"
## ..$ Iteration: num [1:3] 0 1 1
## ..$ Time : 'difftime' num [1:3] 0.0574226379394531 22.3165948390961 9.7177050113678
## .. ..- attr(*, "units")= chr "secs"
## $ bru_info :List of 6
## ..$ method : chr "bru"
## ..$ model :List of 2
## .. ..$ effects:List of 3
## .. .. ..$ Intercept :List of 12
## .. .. .. ..$ label : chr "Intercept"
## .. .. .. ..$ inla.formula:Class 'formula' language ~. + f(Intercept, model = BRU_Intercept_main_model, ngroup = 1, nrep = 1, values = BRU_Intercept_values)
## .. .. .. .. .. ..- attr(*, ".Environment")=<environment: R_GlobalEnv>
## .. .. .. ..$ main :List of 8
## .. .. .. .. ..$ input :List of 4
## .. .. .. .. .. ..$ input : num 1
## .. .. .. .. .. ..$ label : chr "Intercept"
## .. .. .. .. .. ..$ layer : NULL
## .. .. .. .. .. ..$ selector: NULL
## .. .. .. .. .. ..- attr(*, "class")= chr [1:2] "bru_input" "list"
## .. .. .. .. ..$ mapper : list()
## .. .. .. .. .. ..- attr(*, "class")= chr [1:3] "bru_mapper_linear" "bru_mapper" "list"
## .. .. .. .. ..$ model : chr "linear"
## .. .. .. .. ..$ type : chr "linear"
## .. .. .. .. ..$ n : int 1
## .. .. .. .. ..$ values : num 1
## .. .. .. .. ..$ season.length : NULL
## .. .. .. .. ..$ factor_mapping: NULL
## .. .. .. .. ..- attr(*, "class")= chr [1:2] "bru_subcomponent" "list"
## .. .. .. ..$ group :List of 8
## .. .. .. .. ..$ input :List of 4
## .. .. .. .. .. ..$ input : int 1
## .. .. .. .. .. ..$ label : chr "Intercept.group"
## .. .. .. .. .. ..$ layer : NULL
## .. .. .. .. .. ..$ selector: NULL
## .. .. .. .. .. ..- attr(*, "class")= chr [1:2] "bru_input" "list"
## .. .. .. .. ..$ mapper :List of 1
## .. .. .. .. .. ..$ n: num 1
## .. .. .. .. .. ..- attr(*, "class")= chr [1:3] "bru_mapper_index" "bru_mapper" "list"
## .. .. .. .. ..$ model : chr "exchangeable"
## .. .. .. .. ..$ type : chr "exchangeable"
## .. .. .. .. ..$ n : num 1
## .. .. .. .. ..$ values : int 1
## .. .. .. .. ..$ season.length : NULL
## .. .. .. .. ..$ factor_mapping: NULL
## .. .. .. .. ..- attr(*, "class")= chr [1:2] "bru_subcomponent" "list"
## .. .. .. ..$ replicate :List of 8
## .. .. .. .. ..$ input :List of 4
## .. .. .. .. .. ..$ input : int 1
## .. .. .. .. .. ..$ label : chr "Intercept.repl"
## .. .. .. .. .. ..$ layer : NULL
## .. .. .. .. .. ..$ selector: NULL
## .. .. .. .. .. ..- attr(*, "class")= chr [1:2] "bru_input" "list"
## .. .. .. .. ..$ mapper :List of 1
## .. .. .. .. .. ..$ n: num 1
## .. .. .. .. .. ..- attr(*, "class")= chr [1:3] "bru_mapper_index" "bru_mapper" "list"
## .. .. .. .. ..$ model : chr "iid"
## .. .. .. .. ..$ type : chr "iid"
## .. .. .. .. ..$ n : num 1
## .. .. .. .. ..$ values : int 1
## .. .. .. .. ..$ season.length : NULL
## .. .. .. .. ..$ factor_mapping: NULL
## .. .. .. .. ..- attr(*, "class")= chr [1:2] "bru_subcomponent" "list"
## .. .. .. ..$ weights : NULL
## .. .. .. ..$ copy : NULL
## .. .. .. ..$ marginal : NULL
## .. .. .. ..$ env :<environment: R_GlobalEnv>
## .. .. .. ..$ env_extra :<environment: 0x5b13c9132638>
## .. .. .. ..$ fcall : language "f"(Intercept, model = BRU_Intercept_main_model, ngroup = 1, nrep = 1, values = BRU_Intercept_values)
## .. .. .. ..$ mapper :List of 6
## .. .. .. .. ..$ mappers :List of 2
## .. .. .. .. .. ..$ mapper:List of 9
## .. .. .. .. .. .. ..$ mappers :List of 3
## .. .. .. .. .. .. .. ..$ main : list()
## .. .. .. .. .. .. .. .. ..- attr(*, "class")= chr [1:3] "bru_mapper_linear" "bru_mapper" "list"
## .. .. .. .. .. .. .. ..$ group :List of 1
## .. .. .. .. .. .. .. .. ..$ n: num 1
## .. .. .. .. .. .. .. .. ..- attr(*, "class")= chr [1:3] "bru_mapper_index" "bru_mapper" "list"
## .. .. .. .. .. .. .. ..$ replicate:List of 1
## .. .. .. .. .. .. .. .. ..$ n: num 1
## .. .. .. .. .. .. .. .. ..- attr(*, "class")= chr [1:3] "bru_mapper_index" "bru_mapper" "list"
## .. .. .. .. .. .. ..$ n_multi :List of 3
## .. .. .. .. .. .. .. ..$ main : int 1
## .. .. .. .. .. .. .. ..$ group : num 1
## .. .. .. .. .. .. .. ..$ replicate: num 1
## .. .. .. .. .. .. ..$ n_inla_multi :List of 3
## .. .. .. .. .. .. .. ..$ main : int 1
## .. .. .. .. .. .. .. ..$ group : num 1
## .. .. .. .. .. .. .. ..$ replicate: num 1
## .. .. .. .. .. .. ..$ values_multi :List of 3
## .. .. .. .. .. .. .. ..$ main : num 1
## .. .. .. .. .. .. .. ..$ group : int 1
## .. .. .. .. .. .. .. ..$ replicate: int 1
## .. .. .. .. .. .. ..$ values_inla_multi:List of 3
## .. .. .. .. .. .. .. ..$ main : num 1
## .. .. .. .. .. .. .. ..$ group : int 1
## .. .. .. .. .. .. .. ..$ replicate: int 1
## .. .. .. .. .. .. ..$ is_linear_multi :List of 3
## .. .. .. .. .. .. .. ..$ main : logi TRUE
## .. .. .. .. .. .. .. ..$ group : logi TRUE
## .. .. .. .. .. .. .. ..$ replicate: logi TRUE
## .. .. .. .. .. .. ..$ n : num 1
## .. .. .. .. .. .. ..$ n_inla : num 1
## .. .. .. .. .. .. ..$ is_linear : logi TRUE
## .. .. .. .. .. .. ..- attr(*, "class")= chr [1:3] "bru_mapper_multi" "bru_mapper" "list"
## .. .. .. .. .. ..$ scale : list()
## .. .. .. .. .. .. ..- attr(*, "class")= chr [1:3] "bru_mapper_scale" "bru_mapper" "list"
## .. .. .. .. ..$ : Named logi [1:2] TRUE TRUE
## .. .. .. .. .. ..- attr(*, "names")= chr [1:2] "mapper" "scale"
## .. .. .. .. ..$ is_linear: logi TRUE
## .. .. .. .. ..$ n_multi : Named int [1:2] 1 NA
## .. .. .. .. .. ..- attr(*, "names")= chr [1:2] "mapper" "scale"
## .. .. .. .. ..$ n : num 1
## .. .. .. .. ..$ names : chr [1:2] "mapper" "scale"
## .. .. .. .. ..- attr(*, "class")= chr [1:3] "bru_mapper_pipe" "bru_mapper" "list"
## .. .. .. ..- attr(*, "class")= chr [1:2] "component" "list"
## .. .. ..$ SpeedLimit:List of 12
## .. .. .. ..$ label : chr "SpeedLimit"
## .. .. .. ..$ inla.formula:Class 'formula' language ~. + f(SpeedLimit, model = BRU_SpeedLimit_main_model, ngroup = 1, nrep = 1, values = BRU_SpeedLimit_values)
## .. .. .. .. .. ..- attr(*, ".Environment")=<environment: R_GlobalEnv>
## .. .. .. ..$ main :List of 8
## .. .. .. .. ..$ input :List of 4
## .. .. .. .. .. ..$ input : symbol SpeedLimit
## .. .. .. .. .. ..$ label : chr "SpeedLimit"
## .. .. .. .. .. ..$ layer : NULL
## .. .. .. .. .. ..$ selector: NULL
## .. .. .. .. .. ..- attr(*, "class")= chr [1:2] "bru_input" "list"
## .. .. .. .. ..$ mapper : list()
## .. .. .. .. .. ..- attr(*, "class")= chr [1:3] "bru_mapper_linear" "bru_mapper" "list"
## .. .. .. .. ..$ model : chr "linear"
## .. .. .. .. ..$ type : chr "linear"
## .. .. .. .. ..$ n : int 1
## .. .. .. .. ..$ values : num 1
## .. .. .. .. ..$ season.length : NULL
## .. .. .. .. ..$ factor_mapping: NULL
## .. .. .. .. ..- attr(*, "class")= chr [1:2] "bru_subcomponent" "list"
## .. .. .. ..$ group :List of 8
## .. .. .. .. ..$ input :List of 4
## .. .. .. .. .. ..$ input : int 1
## .. .. .. .. .. ..$ label : chr "SpeedLimit.group"
## .. .. .. .. .. ..$ layer : NULL
## .. .. .. .. .. ..$ selector: NULL
## .. .. .. .. .. ..- attr(*, "class")= chr [1:2] "bru_input" "list"
## .. .. .. .. ..$ mapper :List of 1
## .. .. .. .. .. ..$ n: num 1
## .. .. .. .. .. ..- attr(*, "class")= chr [1:3] "bru_mapper_index" "bru_mapper" "list"
## .. .. .. .. ..$ model : chr "exchangeable"
## .. .. .. .. ..$ type : chr "exchangeable"
## .. .. .. .. ..$ n : num 1
## .. .. .. .. ..$ values : int 1
## .. .. .. .. ..$ season.length : NULL
## .. .. .. .. ..$ factor_mapping: NULL
## .. .. .. .. ..- attr(*, "class")= chr [1:2] "bru_subcomponent" "list"
## .. .. .. ..$ replicate :List of 8
## .. .. .. .. ..$ input :List of 4
## .. .. .. .. .. ..$ input : int 1
## .. .. .. .. .. ..$ label : chr "SpeedLimit.repl"
## .. .. .. .. .. ..$ layer : NULL
## .. .. .. .. .. ..$ selector: NULL
## .. .. .. .. .. ..- attr(*, "class")= chr [1:2] "bru_input" "list"
## .. .. .. .. ..$ mapper :List of 1
## .. .. .. .. .. ..$ n: num 1
## .. .. .. .. .. ..- attr(*, "class")= chr [1:3] "bru_mapper_index" "bru_mapper" "list"
## .. .. .. .. ..$ model : chr "iid"
## .. .. .. .. ..$ type : chr "iid"
## .. .. .. .. ..$ n : num 1
## .. .. .. .. ..$ values : int 1
## .. .. .. .. ..$ season.length : NULL
## .. .. .. .. ..$ factor_mapping: NULL
## .. .. .. .. ..- attr(*, "class")= chr [1:2] "bru_subcomponent" "list"
## .. .. .. ..$ weights : NULL
## .. .. .. ..$ copy : NULL
## .. .. .. ..$ marginal : NULL
## .. .. .. ..$ env :<environment: R_GlobalEnv>
## .. .. .. ..$ env_extra :<environment: 0x5b13c97a8eb8>
## .. .. .. ..$ fcall : language "f"(SpeedLimit, model = BRU_SpeedLimit_main_model, ngroup = 1, nrep = 1, values = BRU_SpeedLimit_values)
## .. .. .. ..$ mapper :List of 6
## .. .. .. .. ..$ mappers :List of 2
## .. .. .. .. .. ..$ mapper:List of 9
## .. .. .. .. .. .. ..$ mappers :List of 3
## .. .. .. .. .. .. .. ..$ main : list()
## .. .. .. .. .. .. .. .. ..- attr(*, "class")= chr [1:3] "bru_mapper_linear" "bru_mapper" "list"
## .. .. .. .. .. .. .. ..$ group :List of 1
## .. .. .. .. .. .. .. .. ..$ n: num 1
## .. .. .. .. .. .. .. .. ..- attr(*, "class")= chr [1:3] "bru_mapper_index" "bru_mapper" "list"
## .. .. .. .. .. .. .. ..$ replicate:List of 1
## .. .. .. .. .. .. .. .. ..$ n: num 1
## .. .. .. .. .. .. .. .. ..- attr(*, "class")= chr [1:3] "bru_mapper_index" "bru_mapper" "list"
## .. .. .. .. .. .. ..$ n_multi :List of 3
## .. .. .. .. .. .. .. ..$ main : int 1
## .. .. .. .. .. .. .. ..$ group : num 1
## .. .. .. .. .. .. .. ..$ replicate: num 1
## .. .. .. .. .. .. ..$ n_inla_multi :List of 3
## .. .. .. .. .. .. .. ..$ main : int 1
## .. .. .. .. .. .. .. ..$ group : num 1
## .. .. .. .. .. .. .. ..$ replicate: num 1
## .. .. .. .. .. .. ..$ values_multi :List of 3
## .. .. .. .. .. .. .. ..$ main : num 1
## .. .. .. .. .. .. .. ..$ group : int 1
## .. .. .. .. .. .. .. ..$ replicate: int 1
## .. .. .. .. .. .. ..$ values_inla_multi:List of 3
## .. .. .. .. .. .. .. ..$ main : num 1
## .. .. .. .. .. .. .. ..$ group : int 1
## .. .. .. .. .. .. .. ..$ replicate: int 1
## .. .. .. .. .. .. ..$ is_linear_multi :List of 3
## .. .. .. .. .. .. .. ..$ main : logi TRUE
## .. .. .. .. .. .. .. ..$ group : logi TRUE
## .. .. .. .. .. .. .. ..$ replicate: logi TRUE
## .. .. .. .. .. .. ..$ n : num 1
## .. .. .. .. .. .. ..$ n_inla : num 1
## .. .. .. .. .. .. ..$ is_linear : logi TRUE
## .. .. .. .. .. .. ..- attr(*, "class")= chr [1:3] "bru_mapper_multi" "bru_mapper" "list"
## .. .. .. .. .. ..$ scale : list()
## .. .. .. .. .. .. ..- attr(*, "class")= chr [1:3] "bru_mapper_scale" "bru_mapper" "list"
## .. .. .. .. ..$ : Named logi [1:2] TRUE TRUE
## .. .. .. .. .. ..- attr(*, "names")= chr [1:2] "mapper" "scale"
## .. .. .. .. ..$ is_linear: logi TRUE
## .. .. .. .. ..$ n_multi : Named int [1:2] 1 NA
## .. .. .. .. .. ..- attr(*, "names")= chr [1:2] "mapper" "scale"
## .. .. .. .. ..$ n : num 1
## .. .. .. .. ..$ names : chr [1:2] "mapper" "scale"
## .. .. .. .. ..- attr(*, "class")= chr [1:3] "bru_mapper_pipe" "bru_mapper" "list"
## .. .. .. ..- attr(*, "class")= chr [1:2] "component" "list"
## .. .. ..$ field :List of 12
## .. .. .. ..$ label : chr "field"
## .. .. .. ..$ inla.formula:Class 'formula' language ~. + f(field, model = BRU_field_main_model, replicate = field.repl, ngroup = 1, nrep = 4L, values = BRU_field_values)
## .. .. .. .. .. ..- attr(*, ".Environment")=<environment: R_GlobalEnv>
## .. .. .. ..$ main :List of 8
## .. .. .. .. ..$ input :List of 4
## .. .. .. .. .. ..$ input : symbol loc
## .. .. .. .. .. ..$ label : chr "field"
## .. .. .. .. .. ..$ layer : NULL
## .. .. .. .. .. ..$ selector: NULL
## .. .. .. .. .. ..- attr(*, "class")= chr [1:2] "bru_input" "list"
## .. .. .. .. ..$ mapper :List of 1
## .. .. .. .. .. ..$ model:List of 21
## .. .. .. .. .. .. ..$ f :List of 3
## .. .. .. .. .. .. .. ..$ model : chr "cgeneric"
## .. .. .. .. .. .. .. ..$ n : int 7169
## .. .. .. .. .. .. .. ..$ cgeneric:List of 5
## .. .. .. .. .. .. .. .. ..$ model: chr "inla_cgeneric_rspde_nonstat_int_model"
## .. .. .. .. .. .. .. .. ..$ shlib: chr "/home/rierasl/R/x86_64-pc-linux-gnu-library/4.4/INLA/bin/linux/64bit/external/rSPDE/librSPDE.so"
## .. .. .. .. .. .. .. .. ..$ n : int 7169
## .. .. .. .. .. .. .. .. ..$ debug: logi FALSE
## .. .. .. .. .. .. .. .. ..$ data :List of 5
## .. .. .. .. .. .. .. .. .. ..$ ints :List of 5
## .. .. .. .. .. .. .. .. .. .. ..$ n : int 7169
## .. .. .. .. .. .. .. .. .. .. ..$ debug : int 0
## .. .. .. .. .. .. .. .. .. .. ..$ graph_opt_i: int [1:16024] 0 0 0 1 1 1 1 1 1 2 ...
## .. .. .. .. .. .. .. .. .. .. ..$ graph_opt_j: int [1:16024] 0 1 985 1 1700 5207 5364 6858 7041 2 ...
## .. .. .. .. .. .. .. .. .. .. ..$ alpha : int 1
## .. .. .. .. .. .. .. .. .. ..$ doubles :List of 2
## .. .. .. .. .. .. .. .. .. .. ..$ start.theta : num [1:4] -0.3344 -0.0286 0 0
## .. .. .. .. .. .. .. .. .. .. ..$ theta.prior.mean: num [1:4] -0.3344 -0.0286 0 0
## .. .. .. .. .. .. .. .. .. ..$ characters:List of 3
## .. .. .. .. .. .. .. .. .. .. ..$ model : chr "inla_cgeneric_rspde_nonstat_int_model"
## .. .. .. .. .. .. .. .. .. .. ..$ shlib : chr "/home/rierasl/R/x86_64-pc-linux-gnu-library/4.4/INLA/bin/linux/64bit/external/rSPDE/librSPDE.so"
## .. .. .. .. .. .. .. .. .. .. ..$ prior.theta.param: chr "theta"
## .. .. .. .. .. .. .. .. .. ..$ matrices :List of 3
## .. .. .. .. .. .. .. .. .. .. ..$ B_tau : num [1:35847] 7169 5 -0.693 -1 0.5 ...
## .. .. .. .. .. .. .. .. .. .. ..$ B_kappa : num [1:35847] 7169 5 0.693 0 -1 ...
## .. .. .. .. .. .. .. .. .. .. ..$ theta.prior.prec: num [1:18] 4 4 0.1 0 0 0 0 0.1 0 0 ...
## .. .. .. .. .. .. .. .. .. ..$ smatrices :List of 2
## .. .. .. .. .. .. .. .. .. .. ..$ C: num [1:21510] 7169 7169 7169 0 1 ...
## .. .. .. .. .. .. .. .. .. .. ..$ G: num [1:74640] 7169 7169 24879 0 1 ...
## .. .. .. .. .. .. .. .. ..- attr(*, "class")= chr "inla.cgeneric"
## .. .. .. .. .. .. ..$ cgeneric_type : chr "int_alpha"
## .. .. .. .. .. .. ..$ nu : num 0.5
## .. .. .. .. .. .. ..$ theta.prior.mean : num [1:4] -0.3344 -0.0286 0 0
## .. .. .. .. .. .. ..$ prior.nu :List of 4
## .. .. .. .. .. .. .. ..$ loglocation: num -5e-06
## .. .. .. .. .. .. .. ..$ mean : num 1
## .. .. .. .. .. .. .. ..$ prec : num 3
## .. .. .. .. .. .. .. ..$ logscale : num 1
## .. .. .. .. .. .. ..$ theta.prior.prec : num [1:4, 1:4] 0.1 0 0 0 0 0.1 0 0 0 0 ...
## .. .. .. .. .. .. ..$ start.nu : num 0.5
## .. .. .. .. .. .. ..$ integer.nu : logi TRUE
## .. .. .. .. .. .. ..$ start.theta : num [1:4] -0.3344 -0.0286 0 0
## .. .. .. .. .. .. ..$ stationary : logi FALSE
## .. .. .. .. .. .. ..$ rspde.order : num 2
## .. .. .. .. .. .. ..$ dim : num 1
## .. .. .. .. .. .. ..$ est_nu : logi FALSE
## .. .. .. .. .. .. ..$ nu.upper.bound : num 2
## .. .. .. .. .. .. ..$ prior.nu.dist : chr "lognormal"
## .. .. .. .. .. .. ..$ debug : logi FALSE
## .. .. .. .. .. .. ..$ type.rational.approx: chr "chebfun"
## .. .. .. .. .. .. ..$ mesh :Classes 'metric_graph', 'R6' <metric_graph>
## Public:
## add_mesh_observations: function (data = NULL, group = NULL)
## add_observations: function (data = NULL, edge_number = "edge_number", distance_on_edge = "distance_on_edge",
## build_mesh: function (h = NULL, n = NULL, continuous = TRUE, continuous.outs = FALSE,
## buildC: function (alpha = 2, edge_constraint = FALSE)
## buildDirectionalConstraints: function (alpha = 1)
## C: NULL
## characteristics: list
## check_distance_consistency: function ()
## check_euclidean: function ()
## clear_observations: function ()
## clone: function (deep = FALSE)
## CoB: NULL
## compute_characteristics: function (check_euclidean = FALSE)
## compute_fem: function (petrov = FALSE)
## compute_geodist: function (full = FALSE, obs = TRUE, group = NULL, verbose = 0)
## compute_geodist_mesh: function ()
## compute_geodist_PtE: function (PtE, normalized = TRUE, include_vertices = TRUE, verbose = 0)
## compute_laplacian: function (full = FALSE, obs = TRUE, group = NULL, verbose = 0)
## compute_PtE_edges: function ()
## compute_resdist: function (full = FALSE, obs = TRUE, group = NULL, check_euclidean = FALSE,
## compute_resdist_mesh: function ()
## compute_resdist_PtE: function (PtE, normalized = TRUE, include_vertices = FALSE, check_euclidean = FALSE,
## coordinates: function (PtE = NULL, XY = NULL, normalized = TRUE)
## drop_na: function (...)
## E: 1 3 3 6 4 7 9 11 13 14 15 16 18 19 20 21 23 25 27 29 31 ...
## edge_lengths: 0.0363234139144278 0.01586106867077 0.027923568765887 0. ...
## edges: metric_graph_edges
## edgeweight_to_data: function (loc = NULL, mesh = FALSE, data_loc = FALSE, weight_col = NULL,
## fem_basis: function (PtE)
## filter: function (..., .drop_na = FALSE, .drop_all_na = TRUE)
## geo_dist: list
## get_data: function (group = NULL, tibble = TRUE, drop_na = FALSE, drop_all_na = TRUE)
## get_degrees: function (which = "degree")
## get_edge_lengths: function (unit = NULL)
## get_edge_weights: function (data.frame = FALSE, tibble = TRUE)
## get_groups: function (get_cols = FALSE)
## get_initial_graph: function ()
## get_locations: function ()
## get_mesh_locations: function (bru = FALSE, loc = NULL, normalized = TRUE)
## get_PtE: function ()
## get_vertices_incomp_dir: function ()
## initialize: function (edges = NULL, V = NULL, E = NULL, vertex_unit = NULL,
## is_tree: function ()
## Laplacian: NULL
## mesh: list
## mesh_A: function (PtE)
## mutate: function (..., .drop_na = FALSE, .drop_all_na = TRUE)
## nE: 6827
## nV: 4017
## observation_to_vertex: function (tolerance = 1e-15, mesh_warning = TRUE)
## plot: function (data = NULL, newdata = NULL, group = 1, plotly = FALSE,
## plot_connections: function ()
## plot_function: function (data = NULL, newdata = NULL, group = 1, X = NULL, plotly = FALSE,
## plot_movie: function (X, plotly = TRUE, vertex_size = 5, vertex_color = "black",
## print: function ()
## process_data: function (data = NULL, edge_number = "edge_number", distance_on_edge = "distance_on_edge",
## prune_vertices: function (check_weights = TRUE, verbose = FALSE)
## PtV: NULL
## res_dist: NULL
## select: function (..., .drop_na = FALSE, .drop_all_na = TRUE)
## set_edge_weights: function (weights = rep(1, self$nE), kirchhoff_weights = NULL)
## summarise: function (..., .include_graph_groups = FALSE, .groups = NULL,
## summary: function (messages = FALSE, compute_characteristics = TRUE, check_euclidean = TRUE,
## V: -122.41277 -122.41249 -122.40376 -122.40358 -122.40379 - ...
## vertices: metric_graph_vertices
## VtEfirst: function ()
## Private:
## A: function (group = NULL, obs_to_vert = FALSE, drop_na = FALSE,
## add_vertices: function (PtE, tolerance = 1e-10, verbose)
## addinfo: FALSE
## clear_initial_info: function ()
## compute_degrees: function ()
## compute_laplacian_PtE: function (PtE, normalized = TRUE, verbose = verbose)
## compute_lengths: function (longlat, unit, crs, proj4string, which_longlat, vertex_unit,
## connected: TRUE
## coordinates_multiple_snaps: function (XY, tolerance, verbose = verbose, crs, proj4string,
## create_update_vertices: function ()
## crs: crs
## data: metric_graph_data, list
## edge_weights: tbl_df, tbl, data.frame
## find_edge_edge_points: function (tol, verbose, crs, proj4string, longlat, fact, which_longlat)
## find_mesh_bc: function ()
## get_edge_weights_internal: function (data.frame = FALSE)
## group_col: .group
## initial_edges_added: NULL
## initial_graph: metric_graph, R6
## kirchhoff_weights: NULL
## length_unit: km
## line_to_vertex: function (tolerance = 0, longlat = FALSE, fact, verbose, crs,
## longlat: TRUE
## merge_close_vertices: function (tolerance, fact)
## merge.all.deg2: function ()
## mesh_merge_deg2: function ()
## mesh_merge_outs: function ()
## move_V_first: function ()
## plot_2d: function (line_width = 0.1, marker_size = 1, vertex_color = "black",
## plot_3d: function (line_width = 1, marker_size = 1, vertex_color = "rgb(0,0,0)",
## proj4string: NULL
## prune_warning: FALSE
## pruned: FALSE
## PtE_to_mesh: function (PtE)
## ref_edges: 1 1552 2 5 3133 4 6 395 7 526 8 6466 9 10 11 12 38 13 14 ...
## remove_circles: function (threshold, verbose, longlat, unit, crs, proj4string,
## remove.first.deg2: function (res)
## set_first_weights: function (weights = rep(1, self$nE))
## set_petrov_matrices: function ()
## split_edge: function (Ei, t, tolerance = 0)
## temp_PtE: NULL
## tolerance: list
## transform: FALSE
## vertex_unit: degrees
## which_longlat: sf
## .. .. .. .. .. .. ..$ fem_mesh :List of 4
## .. .. .. .. .. .. .. ..$ c0:Formal class 'dgTMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. .. .. .. .. ..@ i : int [1:7169] 0 1 2 3 4 5 6 7 8 9 ...
## .. .. .. .. .. .. .. .. .. ..@ j : int [1:7169] 0 1 2 3 4 5 6 7 8 9 ...
## .. .. .. .. .. .. .. .. .. ..@ Dim : int [1:2] 7169 7169
## .. .. .. .. .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. .. .. .. ..@ x : num [1:7169] 0.0797 0.1564 0.1117 0.0493 0.0614 ...
## .. .. .. .. .. .. .. .. .. ..@ factors : list()
## .. .. .. .. .. .. .. ..$ g1:Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. .. .. .. .. ..@ i : int [1:24879] 0 1 985 0 1 1700 5207 5364 6858 7041 ...
## .. .. .. .. .. .. .. .. .. ..@ p : int [1:7170] 0 3 10 16 20 23 27 36 44 50 ...
## .. .. .. .. .. .. .. .. .. ..@ Dim : int [1:2] 7169 7169
## .. .. .. .. .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. .. .. .. ..@ x : num [1:24879] 101.1 -55.1 -46.1 -55.1 216.4 ...
## .. .. .. .. .. .. .. .. .. ..@ factors : list()
## .. .. .. .. .. .. .. ..$ g2:Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. .. .. .. .. ..@ i : int [1:56007] 0 1 985 986 1700 4722 5207 5364 6240 6858 ...
## .. .. .. .. .. .. .. .. .. ..@ p : int [1:7170] 0 11 22 34 43 52 61 76 89 99 ...
## .. .. .. .. .. .. .. .. .. ..@ Dim : int [1:2] 7169 7169
## .. .. .. .. .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. .. .. .. ..@ x : num [1:56007] 172097 -145986 -232979 119006 15770 ...
## .. .. .. .. .. .. .. .. .. ..@ factors : list()
## .. .. .. .. .. .. .. ..$ g3:Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. .. .. .. .. ..@ i : int [1:96755] 0 1 230 984 985 986 1700 1701 2280 2455 ...
## .. .. .. .. .. .. .. .. .. ..@ p : int [1:7170] 0 17 35 57 76 91 103 126 150 166 ...
## .. .. .. .. .. .. .. .. .. ..@ Dim : int [1:2] 7169 7169
## .. .. .. .. .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. .. .. .. ..@ x : num [1:96755] 3.94e+08 -3.74e+08 -2.65e+07 -9.14e+07 -1.47e+09 ...
## .. .. .. .. .. .. .. .. .. ..@ factors : list()
## .. .. .. .. .. .. ..$ parameterization : chr "matern"
## .. .. .. .. .. .. ..$ n.spde : int 7169
## .. .. .. .. .. .. ..- attr(*, "class")= chr [1:3] "rspde_metric_graph" "inla_rspde" "inla.cgeneric"
## .. .. .. .. .. ..- attr(*, "class")= chr [1:3] "bru_mapper_inla_rspde" "bru_mapper" "list"
## .. .. .. .. ..$ model :List of 21
## .. .. .. .. .. ..$ f :List of 3
## .. .. .. .. .. .. ..$ model : chr "cgeneric"
## .. .. .. .. .. .. ..$ n : int 7169
## .. .. .. .. .. .. ..$ cgeneric:List of 5
## .. .. .. .. .. .. .. ..$ model: chr "inla_cgeneric_rspde_nonstat_int_model"
## .. .. .. .. .. .. .. ..$ shlib: chr "/home/rierasl/R/x86_64-pc-linux-gnu-library/4.4/INLA/bin/linux/64bit/external/rSPDE/librSPDE.so"
## .. .. .. .. .. .. .. ..$ n : int 7169
## .. .. .. .. .. .. .. ..$ debug: logi FALSE
## .. .. .. .. .. .. .. ..$ data :List of 5
## .. .. .. .. .. .. .. .. ..$ ints :List of 5
## .. .. .. .. .. .. .. .. .. ..$ n : int 7169
## .. .. .. .. .. .. .. .. .. ..$ debug : int 0
## .. .. .. .. .. .. .. .. .. ..$ graph_opt_i: int [1:16024] 0 0 0 1 1 1 1 1 1 2 ...
## .. .. .. .. .. .. .. .. .. ..$ graph_opt_j: int [1:16024] 0 1 985 1 1700 5207 5364 6858 7041 2 ...
## .. .. .. .. .. .. .. .. .. ..$ alpha : int 1
## .. .. .. .. .. .. .. .. ..$ doubles :List of 2
## .. .. .. .. .. .. .. .. .. ..$ start.theta : num [1:4] -0.3344 -0.0286 0 0
## .. .. .. .. .. .. .. .. .. ..$ theta.prior.mean: num [1:4] -0.3344 -0.0286 0 0
## .. .. .. .. .. .. .. .. ..$ characters:List of 3
## .. .. .. .. .. .. .. .. .. ..$ model : chr "inla_cgeneric_rspde_nonstat_int_model"
## .. .. .. .. .. .. .. .. .. ..$ shlib : chr "/home/rierasl/R/x86_64-pc-linux-gnu-library/4.4/INLA/bin/linux/64bit/external/rSPDE/librSPDE.so"
## .. .. .. .. .. .. .. .. .. ..$ prior.theta.param: chr "theta"
## .. .. .. .. .. .. .. .. ..$ matrices :List of 3
## .. .. .. .. .. .. .. .. .. ..$ B_tau : num [1:35847] 7169 5 -0.693 -1 0.5 ...
## .. .. .. .. .. .. .. .. .. ..$ B_kappa : num [1:35847] 7169 5 0.693 0 -1 ...
## .. .. .. .. .. .. .. .. .. ..$ theta.prior.prec: num [1:18] 4 4 0.1 0 0 0 0 0.1 0 0 ...
## .. .. .. .. .. .. .. .. ..$ smatrices :List of 2
## .. .. .. .. .. .. .. .. .. ..$ C: num [1:21510] 7169 7169 7169 0 1 ...
## .. .. .. .. .. .. .. .. .. ..$ G: num [1:74640] 7169 7169 24879 0 1 ...
## .. .. .. .. .. .. .. ..- attr(*, "class")= chr "inla.cgeneric"
## .. .. .. .. .. ..$ cgeneric_type : chr "int_alpha"
## .. .. .. .. .. ..$ nu : num 0.5
## .. .. .. .. .. ..$ theta.prior.mean : num [1:4] -0.3344 -0.0286 0 0
## .. .. .. .. .. ..$ prior.nu :List of 4
## .. .. .. .. .. .. ..$ loglocation: num -5e-06
## .. .. .. .. .. .. ..$ mean : num 1
## .. .. .. .. .. .. ..$ prec : num 3
## .. .. .. .. .. .. ..$ logscale : num 1
## .. .. .. .. .. ..$ theta.prior.prec : num [1:4, 1:4] 0.1 0 0 0 0 0.1 0 0 0 0 ...
## .. .. .. .. .. ..$ start.nu : num 0.5
## .. .. .. .. .. ..$ integer.nu : logi TRUE
## .. .. .. .. .. ..$ start.theta : num [1:4] -0.3344 -0.0286 0 0
## .. .. .. .. .. ..$ stationary : logi FALSE
## .. .. .. .. .. ..$ rspde.order : num 2
## .. .. .. .. .. ..$ dim : num 1
## .. .. .. .. .. ..$ est_nu : logi FALSE
## .. .. .. .. .. ..$ nu.upper.bound : num 2
## .. .. .. .. .. ..$ prior.nu.dist : chr "lognormal"
## .. .. .. .. .. ..$ debug : logi FALSE
## .. .. .. .. .. ..$ type.rational.approx: chr "chebfun"
## .. .. .. .. .. ..$ mesh :Classes 'metric_graph', 'R6' <metric_graph>
## Public:
## add_mesh_observations: function (data = NULL, group = NULL)
## add_observations: function (data = NULL, edge_number = "edge_number", distance_on_edge = "distance_on_edge",
## build_mesh: function (h = NULL, n = NULL, continuous = TRUE, continuous.outs = FALSE,
## buildC: function (alpha = 2, edge_constraint = FALSE)
## buildDirectionalConstraints: function (alpha = 1)
## C: NULL
## characteristics: list
## check_distance_consistency: function ()
## check_euclidean: function ()
## clear_observations: function ()
## clone: function (deep = FALSE)
## CoB: NULL
## compute_characteristics: function (check_euclidean = FALSE)
## compute_fem: function (petrov = FALSE)
## compute_geodist: function (full = FALSE, obs = TRUE, group = NULL, verbose = 0)
## compute_geodist_mesh: function ()
## compute_geodist_PtE: function (PtE, normalized = TRUE, include_vertices = TRUE, verbose = 0)
## compute_laplacian: function (full = FALSE, obs = TRUE, group = NULL, verbose = 0)
## compute_PtE_edges: function ()
## compute_resdist: function (full = FALSE, obs = TRUE, group = NULL, check_euclidean = FALSE,
## compute_resdist_mesh: function ()
## compute_resdist_PtE: function (PtE, normalized = TRUE, include_vertices = FALSE, check_euclidean = FALSE,
## coordinates: function (PtE = NULL, XY = NULL, normalized = TRUE)
## drop_na: function (...)
## E: 1 3 3 6 4 7 9 11 13 14 15 16 18 19 20 21 23 25 27 29 31 ...
## edge_lengths: 0.0363234139144278 0.01586106867077 0.027923568765887 0. ...
## edges: metric_graph_edges
## edgeweight_to_data: function (loc = NULL, mesh = FALSE, data_loc = FALSE, weight_col = NULL,
## fem_basis: function (PtE)
## filter: function (..., .drop_na = FALSE, .drop_all_na = TRUE)
## geo_dist: list
## get_data: function (group = NULL, tibble = TRUE, drop_na = FALSE, drop_all_na = TRUE)
## get_degrees: function (which = "degree")
## get_edge_lengths: function (unit = NULL)
## get_edge_weights: function (data.frame = FALSE, tibble = TRUE)
## get_groups: function (get_cols = FALSE)
## get_initial_graph: function ()
## get_locations: function ()
## get_mesh_locations: function (bru = FALSE, loc = NULL, normalized = TRUE)
## get_PtE: function ()
## get_vertices_incomp_dir: function ()
## initialize: function (edges = NULL, V = NULL, E = NULL, vertex_unit = NULL,
## is_tree: function ()
## Laplacian: NULL
## mesh: list
## mesh_A: function (PtE)
## mutate: function (..., .drop_na = FALSE, .drop_all_na = TRUE)
## nE: 6827
## nV: 4017
## observation_to_vertex: function (tolerance = 1e-15, mesh_warning = TRUE)
## plot: function (data = NULL, newdata = NULL, group = 1, plotly = FALSE,
## plot_connections: function ()
## plot_function: function (data = NULL, newdata = NULL, group = 1, X = NULL, plotly = FALSE,
## plot_movie: function (X, plotly = TRUE, vertex_size = 5, vertex_color = "black",
## print: function ()
## process_data: function (data = NULL, edge_number = "edge_number", distance_on_edge = "distance_on_edge",
## prune_vertices: function (check_weights = TRUE, verbose = FALSE)
## PtV: NULL
## res_dist: NULL
## select: function (..., .drop_na = FALSE, .drop_all_na = TRUE)
## set_edge_weights: function (weights = rep(1, self$nE), kirchhoff_weights = NULL)
## summarise: function (..., .include_graph_groups = FALSE, .groups = NULL,
## summary: function (messages = FALSE, compute_characteristics = TRUE, check_euclidean = TRUE,
## V: -122.41277 -122.41249 -122.40376 -122.40358 -122.40379 - ...
## vertices: metric_graph_vertices
## VtEfirst: function ()
## Private:
## A: function (group = NULL, obs_to_vert = FALSE, drop_na = FALSE,
## add_vertices: function (PtE, tolerance = 1e-10, verbose)
## addinfo: FALSE
## clear_initial_info: function ()
## compute_degrees: function ()
## compute_laplacian_PtE: function (PtE, normalized = TRUE, verbose = verbose)
## compute_lengths: function (longlat, unit, crs, proj4string, which_longlat, vertex_unit,
## connected: TRUE
## coordinates_multiple_snaps: function (XY, tolerance, verbose = verbose, crs, proj4string,
## create_update_vertices: function ()
## crs: crs
## data: metric_graph_data, list
## edge_weights: tbl_df, tbl, data.frame
## find_edge_edge_points: function (tol, verbose, crs, proj4string, longlat, fact, which_longlat)
## find_mesh_bc: function ()
## get_edge_weights_internal: function (data.frame = FALSE)
## group_col: .group
## initial_edges_added: NULL
## initial_graph: metric_graph, R6
## kirchhoff_weights: NULL
## length_unit: km
## line_to_vertex: function (tolerance = 0, longlat = FALSE, fact, verbose, crs,
## longlat: TRUE
## merge_close_vertices: function (tolerance, fact)
## merge.all.deg2: function ()
## mesh_merge_deg2: function ()
## mesh_merge_outs: function ()
## move_V_first: function ()
## plot_2d: function (line_width = 0.1, marker_size = 1, vertex_color = "black",
## plot_3d: function (line_width = 1, marker_size = 1, vertex_color = "rgb(0,0,0)",
## proj4string: NULL
## prune_warning: FALSE
## pruned: FALSE
## PtE_to_mesh: function (PtE)
## ref_edges: 1 1552 2 5 3133 4 6 395 7 526 8 6466 9 10 11 12 38 13 14 ...
## remove_circles: function (threshold, verbose, longlat, unit, crs, proj4string,
## remove.first.deg2: function (res)
## set_first_weights: function (weights = rep(1, self$nE))
## set_petrov_matrices: function ()
## split_edge: function (Ei, t, tolerance = 0)
## temp_PtE: NULL
## tolerance: list
## transform: FALSE
## vertex_unit: degrees
## which_longlat: sf
## .. .. .. .. .. ..$ fem_mesh :List of 4
## .. .. .. .. .. .. ..$ c0:Formal class 'dgTMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. .. .. .. ..@ i : int [1:7169] 0 1 2 3 4 5 6 7 8 9 ...
## .. .. .. .. .. .. .. .. ..@ j : int [1:7169] 0 1 2 3 4 5 6 7 8 9 ...
## .. .. .. .. .. .. .. .. ..@ Dim : int [1:2] 7169 7169
## .. .. .. .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. .. .. ..@ x : num [1:7169] 0.0797 0.1564 0.1117 0.0493 0.0614 ...
## .. .. .. .. .. .. .. .. ..@ factors : list()
## .. .. .. .. .. .. ..$ g1:Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. .. .. .. ..@ i : int [1:24879] 0 1 985 0 1 1700 5207 5364 6858 7041 ...
## .. .. .. .. .. .. .. .. ..@ p : int [1:7170] 0 3 10 16 20 23 27 36 44 50 ...
## .. .. .. .. .. .. .. .. ..@ Dim : int [1:2] 7169 7169
## .. .. .. .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. .. .. ..@ x : num [1:24879] 101.1 -55.1 -46.1 -55.1 216.4 ...
## .. .. .. .. .. .. .. .. ..@ factors : list()
## .. .. .. .. .. .. ..$ g2:Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. .. .. .. ..@ i : int [1:56007] 0 1 985 986 1700 4722 5207 5364 6240 6858 ...
## .. .. .. .. .. .. .. .. ..@ p : int [1:7170] 0 11 22 34 43 52 61 76 89 99 ...
## .. .. .. .. .. .. .. .. ..@ Dim : int [1:2] 7169 7169
## .. .. .. .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. .. .. ..@ x : num [1:56007] 172097 -145986 -232979 119006 15770 ...
## .. .. .. .. .. .. .. .. ..@ factors : list()
## .. .. .. .. .. .. ..$ g3:Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. .. .. .. ..@ i : int [1:96755] 0 1 230 984 985 986 1700 1701 2280 2455 ...
## .. .. .. .. .. .. .. .. ..@ p : int [1:7170] 0 17 35 57 76 91 103 126 150 166 ...
## .. .. .. .. .. .. .. .. ..@ Dim : int [1:2] 7169 7169
## .. .. .. .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. .. .. ..@ x : num [1:96755] 3.94e+08 -3.74e+08 -2.65e+07 -9.14e+07 -1.47e+09 ...
## .. .. .. .. .. .. .. .. ..@ factors : list()
## .. .. .. .. .. ..$ parameterization : chr "matern"
## .. .. .. .. .. ..$ n.spde : int 7169
## .. .. .. .. .. ..- attr(*, "class")= chr [1:3] "rspde_metric_graph" "inla_rspde" "inla.cgeneric"
## .. .. .. .. ..$ type : chr "cgeneric"
## .. .. .. .. ..$ n : num 7169
## .. .. .. .. ..$ values : int [1:7169] 1 2 3 4 5 6 7 8 9 10 ...
## .. .. .. .. ..$ season.length : NULL
## .. .. .. .. ..$ factor_mapping: NULL
## .. .. .. .. ..- attr(*, "class")= chr [1:2] "bru_subcomponent" "list"
## .. .. .. ..$ group :List of 8
## .. .. .. .. ..$ input :List of 4
## .. .. .. .. .. ..$ input : int 1
## .. .. .. .. .. ..$ label : chr "field.group"
## .. .. .. .. .. ..$ layer : NULL
## .. .. .. .. .. ..$ selector: NULL
## .. .. .. .. .. ..- attr(*, "class")= chr [1:2] "bru_input" "list"
## .. .. .. .. ..$ mapper :List of 1
## .. .. .. .. .. ..$ n: num 1
## .. .. .. .. .. ..- attr(*, "class")= chr [1:3] "bru_mapper_index" "bru_mapper" "list"
## .. .. .. .. ..$ model : chr "exchangeable"
## .. .. .. .. ..$ type : chr "exchangeable"
## .. .. .. .. ..$ n : num 1
## .. .. .. .. ..$ values : int 1
## .. .. .. .. ..$ season.length : NULL
## .. .. .. .. ..$ factor_mapping: NULL
## .. .. .. .. ..- attr(*, "class")= chr [1:2] "bru_subcomponent" "list"
## .. .. .. ..$ replicate :List of 8
## .. .. .. .. ..$ input :List of 4
## .. .. .. .. .. ..$ input : language data_rspde_bru_nonstat[["repl"]]
## .. .. .. .. .. ..$ label : chr "field.repl"
## .. .. .. .. .. ..$ layer : NULL
## .. .. .. .. .. ..$ selector: NULL
## .. .. .. .. .. ..- attr(*, "class")= chr [1:2] "bru_input" "list"
## .. .. .. .. ..$ mapper :List of 4
## .. .. .. .. .. ..$ levels : chr [1:4] "1" "2" "3" "4"
## .. .. .. .. .. ..$ factor_mapping: chr "full"
## .. .. .. .. .. ..$ indexed : logi TRUE
## .. .. .. .. .. ..$ n : int 4
## .. .. .. .. .. ..- attr(*, "class")= chr [1:4] "bru_mapper_factor_index" "bru_mapper_factor" "bru_mapper" "list"
## .. .. .. .. ..$ model : chr "iid"
## .. .. .. .. ..$ type : chr "iid"
## .. .. .. .. ..$ n : int 4
## .. .. .. .. ..$ values : int [1:4] 1 2 3 4
## .. .. .. .. ..$ season.length : NULL
## .. .. .. .. ..$ factor_mapping: NULL
## .. .. .. .. ..- attr(*, "class")= chr [1:2] "bru_subcomponent" "list"
## .. .. .. ..$ weights : NULL
## .. .. .. ..$ copy : NULL
## .. .. .. ..$ marginal : NULL
## .. .. .. ..$ env :<environment: R_GlobalEnv>
## .. .. .. ..$ env_extra :<environment: 0x5b13ca0d9f38>
## .. .. .. ..$ fcall : language "f"(field, model = BRU_field_main_model, replicate = field.repl, ngroup = 1, nrep = 4L, values = BRU_field_values)
## .. .. .. ..$ mapper :List of 6
## .. .. .. .. ..$ mappers :List of 2
## .. .. .. .. .. ..$ mapper:List of 9
## .. .. .. .. .. .. ..$ mappers :List of 3
## .. .. .. .. .. .. .. ..$ main :List of 1
## .. .. .. .. .. .. .. .. ..$ model:List of 21
## .. .. .. .. .. .. .. .. .. ..$ f :List of 3
## .. .. .. .. .. .. .. .. .. .. ..$ model : chr "cgeneric"
## .. .. .. .. .. .. .. .. .. .. ..$ n : int 7169
## .. .. .. .. .. .. .. .. .. .. ..$ cgeneric:List of 5
## .. .. .. .. .. .. .. .. .. .. .. ..$ model: chr "inla_cgeneric_rspde_nonstat_int_model"
## .. .. .. .. .. .. .. .. .. .. .. ..$ shlib: chr "/home/rierasl/R/x86_64-pc-linux-gnu-library/4.4/INLA/bin/linux/64bit/external/rSPDE/librSPDE.so"
## .. .. .. .. .. .. .. .. .. .. .. ..$ n : int 7169
## .. .. .. .. .. .. .. .. .. .. .. ..$ debug: logi FALSE
## .. .. .. .. .. .. .. .. .. .. .. ..$ data :List of 5
## .. .. .. .. .. .. .. .. .. .. .. .. ..$ ints :List of 5
## .. .. .. .. .. .. .. .. .. .. .. .. .. ..$ n : int 7169
## .. .. .. .. .. .. .. .. .. .. .. .. .. ..$ debug : int 0
## .. .. .. .. .. .. .. .. .. .. .. .. .. ..$ graph_opt_i: int [1:16024] 0 0 0 1 1 1 1 1 1 2 ...
## .. .. .. .. .. .. .. .. .. .. .. .. .. ..$ graph_opt_j: int [1:16024] 0 1 985 1 1700 5207 5364 6858 7041 2 ...
## .. .. .. .. .. .. .. .. .. .. .. .. .. ..$ alpha : int 1
## .. .. .. .. .. .. .. .. .. .. .. .. ..$ doubles :List of 2
## .. .. .. .. .. .. .. .. .. .. .. .. .. ..$ start.theta : num [1:4] -0.3344 -0.0286 0 0
## .. .. .. .. .. .. .. .. .. .. .. .. .. ..$ theta.prior.mean: num [1:4] -0.3344 -0.0286 0 0
## .. .. .. .. .. .. .. .. .. .. .. .. ..$ characters:List of 3
## .. .. .. .. .. .. .. .. .. .. .. .. .. ..$ model : chr "inla_cgeneric_rspde_nonstat_int_model"
## .. .. .. .. .. .. .. .. .. .. .. .. .. ..$ shlib : chr "/home/rierasl/R/x86_64-pc-linux-gnu-library/4.4/INLA/bin/linux/64bit/external/rSPDE/librSPDE.so"
## .. .. .. .. .. .. .. .. .. .. .. .. .. ..$ prior.theta.param: chr "theta"
## .. .. .. .. .. .. .. .. .. .. .. .. ..$ matrices :List of 3
## .. .. .. .. .. .. .. .. .. .. .. .. .. ..$ B_tau : num [1:35847] 7169 5 -0.693 -1 0.5 ...
## .. .. .. .. .. .. .. .. .. .. .. .. .. ..$ B_kappa : num [1:35847] 7169 5 0.693 0 -1 ...
## .. .. .. .. .. .. .. .. .. .. .. .. .. ..$ theta.prior.prec: num [1:18] 4 4 0.1 0 0 0 0 0.1 0 0 ...
## .. .. .. .. .. .. .. .. .. .. .. .. ..$ smatrices :List of 2
## .. .. .. .. .. .. .. .. .. .. .. .. .. ..$ C: num [1:21510] 7169 7169 7169 0 1 ...
## .. .. .. .. .. .. .. .. .. .. .. .. .. ..$ G: num [1:74640] 7169 7169 24879 0 1 ...
## .. .. .. .. .. .. .. .. .. .. .. ..- attr(*, "class")= chr "inla.cgeneric"
## .. .. .. .. .. .. .. .. .. ..$ cgeneric_type : chr "int_alpha"
## .. .. .. .. .. .. .. .. .. ..$ nu : num 0.5
## .. .. .. .. .. .. .. .. .. ..$ theta.prior.mean : num [1:4] -0.3344 -0.0286 0 0
## .. .. .. .. .. .. .. .. .. ..$ prior.nu :List of 4
## .. .. .. .. .. .. .. .. .. .. ..$ loglocation: num -5e-06
## .. .. .. .. .. .. .. .. .. .. ..$ mean : num 1
## .. .. .. .. .. .. .. .. .. .. ..$ prec : num 3
## .. .. .. .. .. .. .. .. .. .. ..$ logscale : num 1
## .. .. .. .. .. .. .. .. .. ..$ theta.prior.prec : num [1:4, 1:4] 0.1 0 0 0 0 0.1 0 0 0 0 ...
## .. .. .. .. .. .. .. .. .. ..$ start.nu : num 0.5
## .. .. .. .. .. .. .. .. .. ..$ integer.nu : logi TRUE
## .. .. .. .. .. .. .. .. .. ..$ start.theta : num [1:4] -0.3344 -0.0286 0 0
## .. .. .. .. .. .. .. .. .. ..$ stationary : logi FALSE
## .. .. .. .. .. .. .. .. .. ..$ rspde.order : num 2
## .. .. .. .. .. .. .. .. .. ..$ dim : num 1
## .. .. .. .. .. .. .. .. .. ..$ est_nu : logi FALSE
## .. .. .. .. .. .. .. .. .. ..$ nu.upper.bound : num 2
## .. .. .. .. .. .. .. .. .. ..$ prior.nu.dist : chr "lognormal"
## .. .. .. .. .. .. .. .. .. ..$ debug : logi FALSE
## .. .. .. .. .. .. .. .. .. ..$ type.rational.approx: chr "chebfun"
## .. .. .. .. .. .. .. .. .. ..$ mesh :Classes 'metric_graph', 'R6' <metric_graph>
## Public:
## add_mesh_observations: function (data = NULL, group = NULL)
## add_observations: function (data = NULL, edge_number = "edge_number", distance_on_edge = "distance_on_edge",
## build_mesh: function (h = NULL, n = NULL, continuous = TRUE, continuous.outs = FALSE,
## buildC: function (alpha = 2, edge_constraint = FALSE)
## buildDirectionalConstraints: function (alpha = 1)
## C: NULL
## characteristics: list
## check_distance_consistency: function ()
## check_euclidean: function ()
## clear_observations: function ()
## clone: function (deep = FALSE)
## CoB: NULL
## compute_characteristics: function (check_euclidean = FALSE)
## compute_fem: function (petrov = FALSE)
## compute_geodist: function (full = FALSE, obs = TRUE, group = NULL, verbose = 0)
## compute_geodist_mesh: function ()
## compute_geodist_PtE: function (PtE, normalized = TRUE, include_vertices = TRUE, verbose = 0)
## compute_laplacian: function (full = FALSE, obs = TRUE, group = NULL, verbose = 0)
## compute_PtE_edges: function ()
## compute_resdist: function (full = FALSE, obs = TRUE, group = NULL, check_euclidean = FALSE,
## compute_resdist_mesh: function ()
## compute_resdist_PtE: function (PtE, normalized = TRUE, include_vertices = FALSE, check_euclidean = FALSE,
## coordinates: function (PtE = NULL, XY = NULL, normalized = TRUE)
## drop_na: function (...)
## E: 1 3 3 6 4 7 9 11 13 14 15 16 18 19 20 21 23 25 27 29 31 ...
## edge_lengths: 0.0363234139144278 0.01586106867077 0.027923568765887 0. ...
## edges: metric_graph_edges
## edgeweight_to_data: function (loc = NULL, mesh = FALSE, data_loc = FALSE, weight_col = NULL,
## fem_basis: function (PtE)
## filter: function (..., .drop_na = FALSE, .drop_all_na = TRUE)
## geo_dist: list
## get_data: function (group = NULL, tibble = TRUE, drop_na = FALSE, drop_all_na = TRUE)
## get_degrees: function (which = "degree")
## get_edge_lengths: function (unit = NULL)
## get_edge_weights: function (data.frame = FALSE, tibble = TRUE)
## get_groups: function (get_cols = FALSE)
## get_initial_graph: function ()
## get_locations: function ()
## get_mesh_locations: function (bru = FALSE, loc = NULL, normalized = TRUE)
## get_PtE: function ()
## get_vertices_incomp_dir: function ()
## initialize: function (edges = NULL, V = NULL, E = NULL, vertex_unit = NULL,
## is_tree: function ()
## Laplacian: NULL
## mesh: list
## mesh_A: function (PtE)
## mutate: function (..., .drop_na = FALSE, .drop_all_na = TRUE)
## nE: 6827
## nV: 4017
## observation_to_vertex: function (tolerance = 1e-15, mesh_warning = TRUE)
## plot: function (data = NULL, newdata = NULL, group = 1, plotly = FALSE,
## plot_connections: function ()
## plot_function: function (data = NULL, newdata = NULL, group = 1, X = NULL, plotly = FALSE,
## plot_movie: function (X, plotly = TRUE, vertex_size = 5, vertex_color = "black",
## print: function ()
## process_data: function (data = NULL, edge_number = "edge_number", distance_on_edge = "distance_on_edge",
## prune_vertices: function (check_weights = TRUE, verbose = FALSE)
## PtV: NULL
## res_dist: NULL
## select: function (..., .drop_na = FALSE, .drop_all_na = TRUE)
## set_edge_weights: function (weights = rep(1, self$nE), kirchhoff_weights = NULL)
## summarise: function (..., .include_graph_groups = FALSE, .groups = NULL,
## summary: function (messages = FALSE, compute_characteristics = TRUE, check_euclidean = TRUE,
## V: -122.41277 -122.41249 -122.40376 -122.40358 -122.40379 - ...
## vertices: metric_graph_vertices
## VtEfirst: function ()
## Private:
## A: function (group = NULL, obs_to_vert = FALSE, drop_na = FALSE,
## add_vertices: function (PtE, tolerance = 1e-10, verbose)
## addinfo: FALSE
## clear_initial_info: function ()
## compute_degrees: function ()
## compute_laplacian_PtE: function (PtE, normalized = TRUE, verbose = verbose)
## compute_lengths: function (longlat, unit, crs, proj4string, which_longlat, vertex_unit,
## connected: TRUE
## coordinates_multiple_snaps: function (XY, tolerance, verbose = verbose, crs, proj4string,
## create_update_vertices: function ()
## crs: crs
## data: metric_graph_data, list
## edge_weights: tbl_df, tbl, data.frame
## find_edge_edge_points: function (tol, verbose, crs, proj4string, longlat, fact, which_longlat)
## find_mesh_bc: function ()
## get_edge_weights_internal: function (data.frame = FALSE)
## group_col: .group
## initial_edges_added: NULL
## initial_graph: metric_graph, R6
## kirchhoff_weights: NULL
## length_unit: km
## line_to_vertex: function (tolerance = 0, longlat = FALSE, fact, verbose, crs,
## longlat: TRUE
## merge_close_vertices: function (tolerance, fact)
## merge.all.deg2: function ()
## mesh_merge_deg2: function ()
## mesh_merge_outs: function ()
## move_V_first: function ()
## plot_2d: function (line_width = 0.1, marker_size = 1, vertex_color = "black",
## plot_3d: function (line_width = 1, marker_size = 1, vertex_color = "rgb(0,0,0)",
## proj4string: NULL
## prune_warning: FALSE
## pruned: FALSE
## PtE_to_mesh: function (PtE)
## ref_edges: 1 1552 2 5 3133 4 6 395 7 526 8 6466 9 10 11 12 38 13 14 ...
## remove_circles: function (threshold, verbose, longlat, unit, crs, proj4string,
## remove.first.deg2: function (res)
## set_first_weights: function (weights = rep(1, self$nE))
## set_petrov_matrices: function ()
## split_edge: function (Ei, t, tolerance = 0)
## temp_PtE: NULL
## tolerance: list
## transform: FALSE
## vertex_unit: degrees
## which_longlat: sf
## .. .. .. .. .. .. .. .. .. ..$ fem_mesh :List of 4
## .. .. .. .. .. .. .. .. .. .. ..$ c0:Formal class 'dgTMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. .. .. .. .. .. .. .. ..@ i : int [1:7169] 0 1 2 3 4 5 6 7 8 9 ...
## .. .. .. .. .. .. .. .. .. .. .. .. ..@ j : int [1:7169] 0 1 2 3 4 5 6 7 8 9 ...
## .. .. .. .. .. .. .. .. .. .. .. .. ..@ Dim : int [1:2] 7169 7169
## .. .. .. .. .. .. .. .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. .. .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. .. .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. .. .. .. .. .. .. ..@ x : num [1:7169] 0.0797 0.1564 0.1117 0.0493 0.0614 ...
## .. .. .. .. .. .. .. .. .. .. .. .. ..@ factors : list()
## .. .. .. .. .. .. .. .. .. .. ..$ g1:Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. .. .. .. .. .. .. .. ..@ i : int [1:24879] 0 1 985 0 1 1700 5207 5364 6858 7041 ...
## .. .. .. .. .. .. .. .. .. .. .. .. ..@ p : int [1:7170] 0 3 10 16 20 23 27 36 44 50 ...
## .. .. .. .. .. .. .. .. .. .. .. .. ..@ Dim : int [1:2] 7169 7169
## .. .. .. .. .. .. .. .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. .. .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. .. .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. .. .. .. .. .. .. ..@ x : num [1:24879] 101.1 -55.1 -46.1 -55.1 216.4 ...
## .. .. .. .. .. .. .. .. .. .. .. .. ..@ factors : list()
## .. .. .. .. .. .. .. .. .. .. ..$ g2:Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. .. .. .. .. .. .. .. ..@ i : int [1:56007] 0 1 985 986 1700 4722 5207 5364 6240 6858 ...
## .. .. .. .. .. .. .. .. .. .. .. .. ..@ p : int [1:7170] 0 11 22 34 43 52 61 76 89 99 ...
## .. .. .. .. .. .. .. .. .. .. .. .. ..@ Dim : int [1:2] 7169 7169
## .. .. .. .. .. .. .. .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. .. .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. .. .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. .. .. .. .. .. .. ..@ x : num [1:56007] 172097 -145986 -232979 119006 15770 ...
## .. .. .. .. .. .. .. .. .. .. .. .. ..@ factors : list()
## .. .. .. .. .. .. .. .. .. .. ..$ g3:Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
## .. .. .. .. .. .. .. .. .. .. .. .. ..@ i : int [1:96755] 0 1 230 984 985 986 1700 1701 2280 2455 ...
## .. .. .. .. .. .. .. .. .. .. .. .. ..@ p : int [1:7170] 0 17 35 57 76 91 103 126 150 166 ...
## .. .. .. .. .. .. .. .. .. .. .. .. ..@ Dim : int [1:2] 7169 7169
## .. .. .. .. .. .. .. .. .. .. .. .. ..@ Dimnames:List of 2
## .. .. .. .. .. .. .. .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. .. .. .. .. .. .. .. ..$ : NULL
## .. .. .. .. .. .. .. .. .. .. .. .. ..@ x : num [1:96755] 3.94e+08 -3.74e+08 -2.65e+07 -9.14e+07 -1.47e+09 ...
## .. .. .. .. .. .. .. .. .. .. .. .. ..@ factors : list()
## .. .. .. .. .. .. .. .. .. ..$ parameterization : chr "matern"
## .. .. .. .. .. .. .. .. .. ..$ n.spde : int 7169
## .. .. .. .. .. .. .. .. .. ..- attr(*, "class")= chr [1:3] "rspde_metric_graph" "inla_rspde" "inla.cgeneric"
## .. .. .. .. .. .. .. .. ..- attr(*, "class")= chr [1:3] "bru_mapper_inla_rspde" "bru_mapper" "list"
## .. .. .. .. .. .. .. ..$ group :List of 1
## .. .. .. .. .. .. .. .. ..$ n: num 1
## .. .. .. .. .. .. .. .. ..- attr(*, "class")= chr [1:3] "bru_mapper_index" "bru_mapper" "list"
## .. .. .. .. .. .. .. ..$ replicate:List of 4
## .. .. .. .. .. .. .. .. ..$ levels : chr [1:4] "1" "2" "3" "4"
## .. .. .. .. .. .. .. .. ..$ factor_mapping: chr "full"
## .. .. .. .. .. .. .. .. ..$ indexed : logi TRUE
## .. .. .. .. .. .. .. .. ..$ n : int 4
## .. .. .. .. .. .. .. .. ..- attr(*, "class")= chr [1:4] "bru_mapper_factor_index" "bru_mapper_factor" "bru_mapper" "list"
## .. .. .. .. .. .. ..$ n_multi :List of 3
## .. .. .. .. .. .. .. ..$ main : num 7169
## .. .. .. .. .. .. .. ..$ group : num 1
## .. .. .. .. .. .. .. ..$ replicate: int 4
## .. .. .. .. .. .. ..$ n_inla_multi :List of 3
## .. .. .. .. .. .. .. ..$ main : num 7169
## .. .. .. .. .. .. .. ..$ group : num 1
## .. .. .. .. .. .. .. ..$ replicate: int 4
## .. .. .. .. .. .. ..$ values_multi :List of 3
## .. .. .. .. .. .. .. ..$ main : int [1:7169] 1 2 3 4 5 6 7 8 9 10 ...
## .. .. .. .. .. .. .. ..$ group : int 1
## .. .. .. .. .. .. .. ..$ replicate: int [1:4] 1 2 3 4
## .. .. .. .. .. .. ..$ values_inla_multi:List of 3
## .. .. .. .. .. .. .. ..$ main : int [1:7169] 1 2 3 4 5 6 7 8 9 10 ...
## .. .. .. .. .. .. .. ..$ group : int 1
## .. .. .. .. .. .. .. ..$ replicate: int [1:4] 1 2 3 4
## .. .. .. .. .. .. ..$ is_linear_multi :List of 3
## .. .. .. .. .. .. .. ..$ main : logi TRUE
## .. .. .. .. .. .. .. ..$ group : logi TRUE
## .. .. .. .. .. .. .. ..$ replicate: logi TRUE
## .. .. .. .. .. .. ..$ n : num 28676
## .. .. .. .. .. .. ..$ n_inla : num 28676
## .. .. .. .. .. .. ..$ is_linear : logi TRUE
## .. .. .. .. .. .. ..- attr(*, "class")= chr [1:3] "bru_mapper_multi" "bru_mapper" "list"
## .. .. .. .. .. ..$ scale : list()
## .. .. .. .. .. .. ..- attr(*, "class")= chr [1:3] "bru_mapper_scale" "bru_mapper" "list"
## .. .. .. .. ..$ : Named logi [1:2] TRUE TRUE
## .. .. .. .. .. ..- attr(*, "names")= chr [1:2] "mapper" "scale"
## .. .. .. .. ..$ is_linear: logi TRUE
## .. .. .. .. ..$ n_multi : Named int [1:2] 28676 NA
## .. .. .. .. .. ..- attr(*, "names")= chr [1:2] "mapper" "scale"
## .. .. .. .. ..$ n : num 28676
## .. .. .. .. ..$ names : chr [1:2] "mapper" "scale"
## .. .. .. .. ..- attr(*, "class")= chr [1:3] "bru_mapper_pipe" "bru_mapper" "list"
## .. .. .. ..- attr(*, "class")= chr [1:2] "component" "list"
## .. .. ..- attr(*, "class")= chr [1:2] "component_list" "list"
## .. .. ..- attr(*, ".Environment")=<environment: R_GlobalEnv>
## .. ..$ formula:Class 'formula' language BRU_response ~ f(Intercept, model = BRU_Intercept_main_model, ngroup = 1, nrep = 1, values = BRU_Intercept_v| __truncated__ ...
## .. .. .. ..- attr(*, ".Environment")=<environment: R_GlobalEnv>
## .. ..- attr(*, "class")= chr [1:2] "bru_model" "list"
## ..$ lhoods :List of 1
## .. ..$ :List of 17
## .. .. ..$ family : chr "nbinomial"
## .. .. ..$ formula :Class 'formula' language speed ~ .
## .. .. .. .. ..- attr(*, ".Environment")=<environment: 0x5b13c9154728>
## .. .. ..$ response_data :List of 4
## .. .. .. ..$ BRU_response: num [1:14535] 0 12 24 32 0 19 22 19 30 14 ...
## .. .. .. ..$ BRU_E : num 1
## .. .. .. ..$ BRU_Ntrials : num 1
## .. .. .. ..$ BRU_scale : num 1
## .. .. ..$ data :List of 9
## .. .. .. ..$ speed : num [1:14535] 0 12 24 32 0 19 22 19 30 14 ...
## .. .. .. ..$ SpeedLimit : num [1:14535] -0.101 -0.617 -0.617 -0.617 -0.927 ...
## .. .. .. ..$ E : num [1:14535] 1 1 1 1 1 1 1 1 1 1 ...
## .. .. .. ..$ .coord_x : num [1:14535] -122 -122 -122 -122 -122 ...
## .. .. .. ..$ .coord_y : num [1:14535] 37.8 37.8 37.8 37.8 37.8 ...
## .. .. .. ..$ .edge_number : num [1:14535] 1 4 6 6 9 14 14 14 18 20 ...
## .. .. .. ..$ .distance_on_edge: num [1:14535] 0.437 0.144 0.252 0.658 0.601 ...
## .. .. .. ..$ .group : chr [1:14535] "1" "1" "1" "1" ...
## .. .. .. ..$ loc : num [1:14535, 1:2] 1 4 6 6 9 14 14 14 18 20 ...
## .. .. .. ..- attr(*, "class")= chr [1:2] "metric_graph_data" "list"
## .. .. ..$ E : num 1
## .. .. ..$ Ntrials : num 1
## .. .. ..$ weights : num 1
## .. .. ..$ scale : num 1
## .. .. ..$ samplers : NULL
## .. .. ..$ linear : logi TRUE
## .. .. ..$ expr : NULL
## .. .. ..$ response : chr "BRU_response"
## .. .. ..$ inla.family : chr "nbinomial"
## .. .. ..$ domain : NULL
## .. .. ..$ used :List of 2
## .. .. .. ..$ effect: chr [1:3] "Intercept" "SpeedLimit" "field"
## .. .. .. ..$ latent: chr(0)
## .. .. .. ..- attr(*, "class")= chr "bru_used"
## .. .. ..$ allow_combine : logi TRUE
## .. .. ..$ control.family: NULL
## .. .. ..- attr(*, "class")= chr [1:2] "bru_like" "list"
## .. ..- attr(*, "class")= chr [1:2] "bru_like_list" "list"
## ..$ options :List of 14
## .. ..$ bru_verbose : num 0
## .. ..$ bru_verbose_store: num Inf
## .. ..$ bru_max_iter : num 1
## .. ..$ bru_run : logi TRUE
## .. ..$ bru_int_args :List of 3
## .. .. ..$ method: chr "stable"
## .. .. ..$ nsub1 : num 30
## .. .. ..$ nsub2 : num 9
## .. ..$ bru_method :List of 6
## .. .. ..$ taylor : chr "pandemic"
## .. .. ..$ search : chr "all"
## .. .. ..$ factor : num 1.62
## .. .. ..$ rel_tol : num 0.1
## .. .. ..$ max_step : num 2
## .. .. ..$ line_opt_method: chr "onestep"
## .. ..$ bru_compress_cp : logi TRUE
## .. ..$ bru_debug : logi FALSE
## .. ..$ E : num 1
## .. ..$ Ntrials : num 1
## .. ..$ control.compute :List of 3
## .. .. ..$ config: logi TRUE
## .. .. ..$ dic : logi TRUE
## .. .. ..$ waic : logi TRUE
## .. ..$ control.inla :List of 1
## .. .. ..$ int.strategy: chr "auto"
## .. ..$ control.fixed :List of 1
## .. .. ..$ expand.factor.strategy: chr "inla"
## .. ..$ verbose : logi FALSE
## .. ..- attr(*, "class")= chr [1:2] "bru_options" "list"
## ..$ inlabru_version: Named chr "2.10.1.9004"
## .. ..- attr(*, "names")= chr "version"
## ..$ INLA_version : Named chr "24.04.25-1"
## .. ..- attr(*, "names")= chr "version"
## ..- attr(*, "class")= chr [1:2] "bru_info" "list"
## - attr(*, "class")= chr [1:3] "bru" "iinla" "inla"nonstat.time.fin <- Sys.time()
print(nonstat.time.fin - nonstat.time.ini)## Time difference of 37.15004 secs
summary(rspde_fit_nonstat)## inlabru version: 2.10.1.9004
## INLA version: 24.04.25-1
## Components:
## Intercept: main = linear(1), group = exchangeable(1L), replicate = iid(1L)
## SpeedLimit: main = linear(SpeedLimit), group = exchangeable(1L), replicate = iid(1L)
## field: main = cgeneric(loc), group = exchangeable(1L), replicate = iid(data_rspde_bru_nonstat[["repl"]])
## Likelihoods:
## Family: 'nbinomial'
## Data class: 'metric_graph_data', 'list'
## Predictor: speed ~ .
## Time used:
## Pre = 0.192, Running = 7.9, Post = 1.58, Total = 9.67
## Fixed effects:
## mean sd 0.025quant 0.5quant 0.975quant mode kld
## Intercept 2.926 0.023 2.882 2.926 2.971 2.926 0
## SpeedLimit 0.118 0.011 0.097 0.117 0.139 0.117 0
##
## Random effects:
## Name Model
## field CGeneric
##
## Model hyperparameters:
## mean sd 0.025quant
## size for the nbinomial observations (1/overdispersion) 1.709 0.028 1.655
## Theta1 for field -0.378 0.102 -0.587
## Theta2 for field -0.122 0.269 -0.666
## Theta3 for field 0.377 0.397 -0.240
## Theta4 for field 0.585 0.831 -0.702
## 0.5quant 0.975quant
## size for the nbinomial observations (1/overdispersion) 1.709 1.764
## Theta1 for field -0.376 -0.184
## Theta2 for field -0.118 0.395
## Theta3 for field 0.329 1.284
## Theta4 for field 0.486 2.483
## mode
## size for the nbinomial observations (1/overdispersion) 1.708
## Theta1 for field -0.364
## Theta2 for field -0.097
## Theta3 for field 0.099
## Theta4 for field 0.000
##
## Deviance Information Criterion (DIC) ...............: 113008.40
## Deviance Information Criterion (DIC, saturated) ....: 18825.98
## Effective number of parameters .....................: 930.18
##
## Watanabe-Akaike information criterion (WAIC) ...: 112650.26
## Effective number of parameters .................: 534.13
##
## Marginal log-Likelihood: -56728.29
## is computed
## Posterior summaries for the linear predictor and the fitted values are computed
## (Posterior marginals needs also 'control.compute=list(return.marginals.predictor=TRUE)')
summary(rspde.result(rspde_fit_nonstat, "field", rspde_model_nonstat))## mean sd 0.025quant 0.5quant 0.975quant mode
## Theta1.matern -0.378060 0.102459 -0.587485 -0.375598 -0.183917 -0.364182000
## Theta2.matern -0.122221 0.269385 -0.666456 -0.117718 0.394735 -0.097489300
## Theta3.matern 0.376747 0.397372 -0.240023 0.329376 1.283600 0.099007300
## Theta4.matern 0.585245 0.830916 -0.702420 0.485582 2.482520 -0.000273152
#load(here("Models_output/distmatrixfixed.RData"))
points = data %>%
as.data.frame() %>%
st_as_sf(coords = c(".coord_x", ".coord_y"), crs = 4326) %>%
mutate(., index = 1:nrow(.)) %>%
st_drop_geometry() %>%
dplyr:::select(speed, .group, index) %>%
mutate(.group = as.numeric(.group)) %>%
group_by(.group) %>%
mutate(indexingroup = seq_len(n())) %>%
ungroup()
distance = seq(from = 0, to = 400, by = 20)/1000The code of chunk below was executed only one time.
{r}
load(here("Models_output/distmatrixfixed30_04_2024.RData"))
points = data %>%
as.data.frame() %>%
st_as_sf(coords = c(".coord_x", ".coord_y"), crs = 4326) %>%
mutate(., index = 1:nrow(.)) %>%
st_drop_geometry() %>%
dplyr:::select(speed, .group, index) %>%
mutate(.group = as.numeric(.group)) %>%
group_by(.group) %>%
mutate(indexingroup = seq_len(n())) %>%
ungroup()
distance = seq(from = 0, to = 400, by = 20)/1000
GROUPS <- list()
for (j in 1:length(distance)) {
print(j)
GROUPS[[j]] = list()
for (i in 1:nrow(points)) {
rowi = points[i, ]
GROUPS[[j]][[i]] <- which(as.vector(distmatrixlist[[rowi$.group]][rowi$indexingroup,]) <= distance[j])
}
}
save(GROUPS, file = here("Models_output/GROUPS_for_window_case30_04_2024.RData"))
The code of chunk above was executed only one time.
load(here("Models_output/GROUPS_for_window_case30_04_2024.RData"))
mse.stat <- mse.nonstat <- ls.stat <- ls.nonstat <- rep(0,length(distance))
# cross-validation for-loop
for (j in 1:length(distance)) {
print(j)
# cross-validation of the stationary model
cv.stat <- inla.group.cv(rspde_fit_stat, groups = GROUPS[[j]])
# cross-validation of the nonstationary model
cv.nonstat <- inla.group.cv(rspde_fit_nonstat, groups = GROUPS[[j]])
# obtain MSE and LS
mse.stat[j] <- mean((cv.stat$mean - points$speed)^2)
mse.nonstat[j] <- mean((cv.nonstat$mean - points$speed)^2)
ls.stat[j] <- mean(log(cv.stat$cv))
ls.nonstat[j] <- mean(log(cv.nonstat$cv))
}
## [1] 1
## [1] 2
## [1] 3
## [1] 4
## [1] 5
## [1] 6
## [1] 7
## [1] 8
## [1] 9
## [1] 10
## [1] 11
## [1] 12
## [1] 13
## [1] 14
## [1] 15
## [1] 16
## [1] 17
## [1] 18
## [1] 19
## [1] 20
## [1] 21## plot results
par(mfrow = c(2,2), family = "Palatino")
# Plot MSE
plot(distance, mse.stat, main = "MSE", ylim = c(min(mse.nonstat, mse.stat), max(mse.nonstat, mse.stat)),
type = "l", ylab = "MSE", xlab = "distance in m", col = "black")
lines(distance, mse.nonstat, col = "blue")
legend("bottomright", legend = c("Stationary", "Non-stationary"), col = c("black", "blue"), lty = 1)## plot results
par(mfrow = c(2,2), family = "Palatino")
# Plot log-score
plot(distance, -ls.stat, main = "log-score", ylim = c(min(-ls.nonstat, -ls.stat), max(-ls.nonstat, -ls.stat)),
type = "l", ylab = "log-score", xlab = "distance in m", col = "black")
lines(distance, -ls.nonstat, col = "blue")
legend("bottomright", legend = c("Stationary", "Non-stationary"), col = c("black", "blue"), lty = 1)save.image(here(paste0("Models_output/", rmarkdown::metadata$title, ".RData")))